感謝のプログラミング 10000時間

たどり着いた結果(さき)は、感謝でした。

Excel VBAからバッチファイルを呼び出す

スポンサーリンク

1.イントロダクション

Windowsなどで、バッチファイルをVBAから呼び出したいときもあるかもしれない。
今回はVBAからtest.batを実行するサンプルを紹介する。

2.サンプル

test.batを用意する。

timeout 3 && echo ※※※VBAから呼び出しました※※※

timeout 2

上のtest.batを実行するサンプルがこちら。

Option Explicit

Sub バッチを実行する()
    Dim shellObject As Object
    Dim batchFile As String
    
    batchFile = "C:\tmp\test.bat"
    
    Set shellObject = CreateObject("WScript.Shell")
    shellObject.Run batchFile, 1, True

End Sub

3.デモ

以下のようにバッチを実行できる。
f:id:sho322:20140115201652j:plain

4.補足

「ツール」→「参照設定」で以下のようなチェックが入ってないと実行できないかも。
f:id:sho322:20140115201712j:plain

5.参考

できる逆引き Excel VBAを極める 勝ちワザ700 2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

できる逆引き Excel VBAを極める 勝ちワザ700 2010/2007/2003/2002対応 (「できる逆引き」シリーズ)