ExcelVBAからPowerShell(ps1)を実行

' **************************************************
' PowerShellの実行(Execコマンド使用バージョン)
' **************************************************
Private Function ExecPowerShell(cmdStr As String) As String
 
    ' WshShellオブジェクト
    Dim oExec As Object
 
    ' Execコマンドで実行する
    Set oExec = CreateObject("Wscript.shell").Exec("powershell -ExecutionPolicy Unrestricted -File " + cmdStr)
     
    ' ジョブが実行中(0)の間は、スリープしながら完了(1)まで待つ
    Do While oExec.Status = 0
        ' 100ミリ秒
        Sleep 100
    Loop
 
    ' 標準出力取得
    ExecPowerShell = oExec.StdOut.ReadAll
 
End Function

IE11のオプション設定をレジストリで変更する

「ポップアップの発生時」をレジストリで設定する方法は

ハイブ HKEY_CURRENT_USER
キーパス Software\Microsoft\Internet Explorer\TabbedBrowsing
値の名前 PopupsUseNewWindow
値の種類 REG_DWORD
値のデータ 0:ポップアップを開く方法を Internet Explorer で自動的に判定する
1:常に新しいウィンドウでポップアップを開く
2:常に新しいタブでポップアップを開く

とのことです。