構文
構文は以下の通りです。
ThisWorkbook.Path
解説
現在のVBAコードが実行されているExcelブックのフォルダパスを返します。
プログラミング例
具体的なプログラミング例を紹介します。
Sub ブックのパスを取得する()
Dim 保存場所 As String
保存場所 = ThisWorkbook.Path
MsgBox "このブックの保存場所は: " & 保存場所
End Sub
Dim 保存場所 As String
保存場所 = ThisWorkbook.Path
MsgBox "このブックの保存場所は: " & 保存場所
End Sub
上記のプログラムは、現在のVBAコードが実行されているExcelブックの保存場所を表示します。
まとめ
ThisWorkbook.Pathを使うことで、現在のブックが保存されているフォルダのパスを簡単に取得できます。