2011年12月5日月曜日

[ExcelVBA] GetAttr関数


■構文
GetAttr(pathname)

■説明
ファイルまたはフォルダの属性を表す整数型 (Integer) の整数を返します。
第一引数:ファイルまたはフォルダのパス 
定数内容
vbNormal0通常ファイル
vbReadOnly1読み取り専用ファイル
vbHidden2隠しファイル
vbSystem4システム ファイル
vbDirectory16フォルダ
vbArchive32アーカイブ (属性最後にバックアップした後で、変更されたファイル)

■サンプルコード
  1. Option Explicit  
  2.   
  3. Sub SampleCode()  
  4.     Debug.Print GetAttr("C:\WINDOWS"'16  
  5. End Sub  

0 件のコメント: