使用单元格值的动态cmd.exe

Question

我有一个Excel宏来打开shell程序（cmd.exe），设置一个特定的控制器，然后运行一个命令。

我有2个值会发生变化，并希望它从Excel工作表上的数据输入单元格中提取。

此版本的程序运行正常，但不考虑2个更改单元格值：

Sub mdhash()
Set wsh = VBA.CreateObject("WScript.Shell")
Dim waitOnReturn As Boolean: waitOnReturn = True
Dim windowStyle As Integer: windowStyle = 1

wsh.Run "cmd.exe /S /K cd c:\5620sam\XXXXX\client\nms\bin & nmsclient.bat password2key md5 vzwPass YYYYY", vbNormalFocus

End Sub

这是我尝试过但cmd.exe打开并说“系统无法找到指定的路径”。我在我的工作表上做了一个连接，以缩短下面的代码，看看它是否会有所帮助，但事实并非如此。

Sub mdhash()

Dim val1 As String, val2 As String, wsh As Object
val1 = ActiveSheet.Range("I22").Value
val2 = Range("I21").Value

Set wsh = VBA.CreateObject("WScript.Shell")
Dim waitOnReturn As Boolean: waitOnReturn = True
Dim windowStyle As Integer: windowStyle = 1

wsh.Run "cmd.exe /S /K" & val1 & val2, vbNormalFocus

End Sub