[VBA][Excel]開いているワークブックのパス(Path)とファイル名(Name)


※全てのExcelで動作する保証はありません。また、内容に関し管理人は全ての責任を負いかねます

サンプル ※説明に必要な部分しか記述していません

下記を実行すると

Private Sub CommandButton1_Click()

Sheet1.Range("A1").Value = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name

End Sub

このようになります。

vba-excel-activeworkbook-path-name

※当方と訪問者の方の環境、ファイル名が異なるため結果も上記と異なります