構文
CurDir (drive)
drive・・・・・・ドライブを文字列で指定。長さ0の文字列(””)or省略の場合は現在のドライブを参照
CurDir関数は指定ドライブの現在のフォルダを取得します。
現在のカレントドライブは CurDir で取得可能です。(カレントフォルダも含め取得)
ChDriveステートメントのサンプルコード
Public Sub sample()
'■"カレントフォルダを取得
Debug.Print CurDir 'C:\Users\Documents
Debug.Print CurDir("") 'C:\Users\Documents
'■Cドライブのフォルダを取得する
Debug.Print CurDir("C") 'C:\Users\Documents
'■Dドライブのフォルダを取得する
Debug.Print CurDir("D") 'D:\Excel\VBA
'■存在しない文字列を指定すると実行時エラー '68':デバイスが準備されていません。
Debug.Print CurDir("Y")
End Sub
注意点
- カレントフォルダの「カレント」は「現在作業中」のという意味合いです。
- CurDir関数は指定したドライブのカレントフォルダを取得します。
- ExcelのデフォルトのカレントフォルダはDefaultFilePathプロパティで取得します。



コメント