教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA 関数】CurDirステートメントでカレントフォルダのパスを調べる方法を教えて!

f:id:m_kbou:20210925110205p:plain

カレントフォルダのパスを調べる方法について紹介します。

 

 

構文

記述方法は以下の通りとなります。

CurDir(”[ドライブ]”)

[説明]:

CurDirステートメントはカレントフォルダのパスを返します。カレントフォルダとは現在使用しているディレクトリの事を指します。[ドライブ]は省略する事も可能ですが、指定する場合には「”」(ダブルクォーテーション)で囲みます。内容を纏めると、「[ドライブ]のカレントパスを返して下さい。」との意味になります。

[記述例]:

CurDir("C:")

 

使い方

使い方について具体的に説明します。

[プログラミング例]:

Sub サンプル()

  MsgBox CurDir("C:")

End Sub

内容は、「CドライブのカレントディレクトリをMsgBoxで表示して下さい。」との意味になります。

f:id:m_kbou:20210925110250p:plain

※上記のプログラミング例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。 

[実行例]:

①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。<実行>ボタンをクリックします。(※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210925110304p:plain

②Cドライブの現在のカレントフォルダがWindowsとなるため、「C:\Windows」がMsgBoxで表示されます。

f:id:m_kbou:20210925110316p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

カレントフォルダのパスを調べる方法についての説明は以上です。

 

おわりに

今回はカレントフォルダのパスを調べる方法について説明しました。引数であるドライブは省略する事も可能で、省略した場合には現在のドライブのカレントパスを返します。