ブックの名前、パスを取得する

今回はブックの名前、パスの取得についてメモしておきます。

ここでは「C:\excelmemo」直下に「Sample6_20.xlsm」というファイルが格納されています。

ブックのパスを取得する

実行プログラム

Sub Sample6_20_1()

    MsgBox ThisWorkbook.Path

End Sub

Sub Sample6_20_1()

MsgBox ThisWorkbook.Path

End Sub

実行後

実行プログラム

Sub Sample6_20_2()

    MsgBox ThisWorkbook.Name

End Sub

Sub Sample6_20_2()

MsgBox ThisWorkbook.Name

End Sub

実行後

実行プログラム

Sub Sample6_20_3()

    MsgBox ThisWorkbook.FullName
    
End Sub

Sub Sample6_20_3()

MsgBox ThisWorkbook.FullName

End Sub

実行後