VBA：自ブックの所在フォルダ情報を取得

自ブックの所在フォルダ情報を取得するには次の方法で可能です。

ThisWorkbook.Path

 サンプル

Sub Test()
    MsgBox ThisWorkbook.Path
End Sub