5-02.実用文例：カレントフォルダーを調べるには？

CurDir

カレントフォルダーとは、Excelが現在“注目”しているフォルダーのことです。「ファイルを開く」や「名前を付けて保存」などのダイアログボックスで最初に表示されるフォルダーがカレントフォルダーです。現在のカレントフォルダーを調べるには、CurDir関数を使います。

　右のサンプルでは、CurDir関数の結果から「左から1文字」をLeft関数で取り出し、カレントドライブも表示させています。

カレントフォルダーを表示する

Sub Sample()

MsgBox “カレントドライブ:” & Left(CurDir, 1) _

& vbCrLf & “カレントフォルダー:” & CurDir

End Sub

実行例

Excel学習室