構文
構文は以下の通りです。
ActiveWorkBook.Name
解説
ActiveWorkBookは、現在表示しているExcelブックのことです。複数のExcelファイルを開いているときに、どのファイルが現在表示されているかを知りたいときに使います。
プログラミング例
具体的なプログラミング例を紹介します。
Sub 現在のブック名を表示()
Dim ブックの名前 As String
ブックの名前 = ActiveWorkbook.Name
MsgBox "現在開いているブックの名前は " & ブックの名前 & " です。"
End Sub
Dim ブックの名前 As String
ブックの名前 = ActiveWorkbook.Name
MsgBox "現在開いているブックの名前は " & ブックの名前 & " です。"
End Sub
上記のプログラムは、開いているExcelブックの名前をメッセージボックスに表示します。
まとめ
ActiveWorkBook.Nameを使うと、簡単にブックの名前を知ることができます。