WSCの実行状況を確認する

' WshShellオブジェクトを生成
Dim obj As Object
Set obj = CreateObject("WScript.Shell")

' バッチファイルのパス
Dim batPath As String
batPath = "C:\path\to\your\batchfile.bat"

' バッチファイルを同期実行
Call obj.Run(batPath, WaitOnReturn:=True)