エクセルマクロVBA サンプルコード辞書
トップページ（目次）431.自分のファイルの格納フォルダまでのパスを取得する
＜実行前後＞
→
Sub 自分のファイルの格納フォルダまでのパスを取得する()
フォルダパス = ThisWorkbook.Path & "\"
MsgBox フォルダパス
End Sub 'テスト時のフルパスは「C:\test\テスト.xlsm」
Sub 自分のファイルの格納フォルダまでのパスを取得する()
フォルダパス = ThisWorkbook.Path & "\"
MsgBox フォルダパス
End Sub 'テスト時のフルパスは「C:\test\テスト.xlsm」