如何将参数从vba传递给vbs（VBScript）？

Question

我有以下VBA：

Sub StartVbs(sVbsPathNmExt)   
 Shell "Explorer.exe """ & sVbsPathNmExt & """", 1    
End Sub

ParamPassTest.vbs中的以下VBScript：

MsgBox("Hello x" )    
WScript.quit

它会显示一条消息＆＃34; Hello x＆＃34;当我从VBA这样称呼它时：

Sub do_StartVbs()
  Call StartVbs("Z:\somepath\ParamPassTest.vbs")
End Sub

我如何通过＆＃34; x＆＃34;从VBA到VBS作为参数？

我在这里尝试了两种方法，他们要么出错，要么让我的反病毒关闭所有内容： passing argument from vba to vbs

如何将参数传递给vba中的vbs，而不是放松我的防病毒规则？

Answer 1

您可以在VBA中尝试：

Shell "WScript ""C:\path\1.vbs"" 123"

这是1.vbs：

If WScript.Arguments.Count > 0 Then MsgBox WScript.Arguments(0)