VBAからpowershellコマンドを実行

VBAからpowershellスクリプトを呼び出したかったので作成。

ネットで検索していろいろな方法を試してみたけどこれでやっと成功しました。

Dos窓からpowershellを呼び出します。画面は非表示です。

Public Function callPowershell(ByVal cmdStr As String)
'@@powershellコマンドを実行
    Dim Wsh
    Set Wsh = CreateObject("Wscript.shell")

    Wsh.Run "powershell -ExecutionPolicy RemoteSigned -Command " & cmdStr, 0
End Function

ブログでも紹介してます→http://anosonote.hatenablog.com/entry/2015/10/25/171619