ray88’s diary

お仕事で困ったとき用の自分用の覚書

Excel VBA 別のブックのマクロを実行する

■別ブック(Book2.xlsm)の マクロ(マクロ名:test)を実行する

Sub マクロ実行()
'---------------------------------------------
'機能:Book2.xlsm のマクロ(test)を実行する
'---------------------------------------------
    Dim targetFileName As String
    Dim targetPath As String
    Dim wb As Workbook
    
    targetPath = "C:\デスクトップ\ExcelVBAプロジェクト\別ブックマクロ実行\Book2.xlsm"
    targetFileName = "Book2.xlsm"
      
    'マクロ実行するブックを開く
    Set wb = Workbooks.Open(targetPath)
    'ファイル名とマクロ名を指定してマクロ実行
    Application.Run "Book2.xlsm!test"
    'bookを閉じる
    wb.Close False
    Set wb = Nothing
End Sub

■参考URL
他のブックのマクロを実行(Runメソッド)|VBA入門