【VBA】バッチファイルを同期実行する

VBAコード

ここでは例として、
　・デスクトップ配下のバッチファイル「test.bat」を
　・同期実行
します。

'変数の宣言を必須
Option Explicit

Sub sample()

    Dim batchPath As String
    Dim wsh As Object
    
    'バッチファイルのパスを指定
    batchPath = "C:\Users\user\Desktop\test.bat"
    
    Set wsh = CreateObject("WScript.Shell")
    
    'バッチファイルを同期実行
    Call wsh.Run(batchPath, WaitOnReturn:=True)
    
    '後片付け
    Set wsh = Nothing
    
End Sub

実行結果

Windowsのバッチファイルを実行できました。

参考①

上記のVBAコードでは使用していませんが、「Run」メソッドの引数「WindowStyle」の使用により、画面(コマンドプロンプト画面)を非表示にしたり最小化したりできます。

詳細は公式サイトをご確認ください。

参考②

VBAでコマンドプロンプトのコマンドを実行することもできます。
詳細は以下の記事をご確認ください。

VBAでコマンドプロンプトの実行結果を取得することもできます。
詳細は以下の記事をご確認ください。