我在VBScript下面可以运行宏
Option Explicit
Dim ExlApp
Dim mystr
Dim mytl
mystr = WScript.Arguments.Item(0)
mytl = WScript.Arguments.Item(1)
Set ExlApp = CreateObject("Excel.Application")
ExlApp.DisplayAlerts = False
ExlApp.Visible = True
ExlApp.Run "'C:\Users\ks38460\Downloads\Tool\uImport CSV.xlsm'!Sheet1.ImportCSV", CStr(mystr), CStr(mytl)
Set ExlApp = Nothing
但是当我从cmd运行此VBS时,它具有以下两个参数
WScript.exe C:\Users\ks38460\Downloads\Tool\tool2.vbs "C:\Users\ks38460\Downloads\Tool\All Timesheets.csv" "RHM"
它根本不会将第二个参数传递给宏。
注意:我在写为的宏函数中调用参数
Function xyz (xFilename as String, xTL as String)
'some code with xFilename
'some code with xTL
End function
此函数在使用一个参数时运行平稳,但在使用两个参数时会卡住。