vba - 在Excel 2010 VBA中调用shell命令

Question

当我在 vba 中调用 shell 命令时，程序会像命令提示符一样打开，但没有任何反应，也没有获得任何结果。我似乎无法弄清楚，需要一些帮助。

有效的命令

C:\Program Files\BioDiscovery\ImaGene 9.0>ImaGene.exe -batch "C:\Users\cmccabe\Desktop\EmArray\Design\test_11_19_2015.bch"

我在 Excel 2010 中使用 VBA 的尝试(打开程序和命令提示符，但不执行命令)。

Dim Par As String

Par = "dir c:\Program Files\BioDiscovery\ImaGene 9.0\ImaGene.exe -batch "C:\Users\cmccabe\Desktop\EmArray\Design\imagene.bch"
Call Shell("C:\WINDOWS\system32\cmd.exe /c " & Par, 1)
MsgBox ("ImaGene analysis complete")

Answer 1

可能不是最好的答案，但以下解决方案适用于类似的情况。

打开记事本“c:\Program Files\BioDiscovery\ImaGene 9.0\ImaGene.exe”-batch“C:\Users\cmccabe\Desktop\EmArray\Design\imagene.bch”另存为“test.bat”

在 Excel 中调用此 .bat 文件昏暗的 wshell 作为对象

设置 wshell = CreateObject("wscript.shell")wshell.Run Chr(34) & "完整路径\test.bat"

希望这有帮助。