如何通过excel VBA运行powershell脚本

Question

如果满足特定条件，我正在尝试使用 Excel VBA 宏来启动 PowerShell 脚本。代码运行时没有出现任何错误，我可以从 Windows 资源管理器窗口手动运行 PowerShell 脚本而不会出错。但是，当我执行下面的 VBA 代码时，PowerShell 没有运行，我不知道为什么。

Dim x as Variant
If rs.RecordCount = 0 Then
    x = Shell("POWERSHELL.exe " & "H:\MyFolder\MyFile.ps1", 1)
End If

我无法判断 VBA 代码中的某些内容是否有问题，因为我没有收到任何运行时错误，但 PowerShell 脚本实际上并未运行

更新：使用额外的引号，我现在可以看到在 cmd 窗口中弹出的错误消息，但即使使用额外的引号，空间仍然存在问题。我已将我的脚本移动到一个没有空格的不同文件路径，但我现在看到运行脚本被禁用的错误。这似乎不再是基于代码的问题。谢谢你们！

Answer 1

如果您的文件路径有空格，则需要在其周围加上引号。

x = Shell("POWERSHELL.exe -noexit " & _
           """H:\Operations\REPORTS\Reports2018\Balance Sheet\SLmarginJE.ps1""", 1)