在外部运行 VB 脚本

Question

我有一个我创建的 VB 脚本或 Excel 宏，当我从 Excel 作为 excel 宏运行代码时，它工作正常。 但是，当我想从 Windows Explorer 运行它时（即将文本保存为 VBS 脚本），我不断收到Expected Statement错误。

下面的代码实质上从我要使用的模板中删除了两个选项卡，然后将另一个工作簿中的两个选项卡复制到模板中，然后保存该文件。 下面的代码是使用 Excel 中的记录按钮创建的。 我是 VBA 的新手，所以我不知道为什么会发生错误。 我也不想从 Excel 中运行该文件，因为我希望能够更改宏中的文本。 谢谢您的帮助。

Sub mapping_specs_comp_ss()
  Set OrigMapTemplate = Workbooks.Open("D:\Kriss\Mapping Specs\Mapping Specs Template Version 3 - Copy Final.xlsx") 
  Application.DisplayAlerts = False
  OrigMapTemplate.Sheets("QSTEST Mapping").Delete
  OrigMapTemplate.Sheets("QSORRES Mapping").Delete


  Set closedBook = Workbooks.Open("D:\Docs\Mapping Specifications\Automation\Mapping_Create - QSTEST QSORRES.xlsx")
  closedBook.Sheets("QSTEST Mapping").Copy After:=OrigMapTemplate.Sheets("Visit Mapping")
  closedBook.Sheets("QSORRES Mapping").Copy After:=OrigMapTemplate.Sheets("QSTEST Mapping")
  closedBook.Close SaveChanges:=False

  ActiveWorkbook.SaveAs Filename:= _
        "D:\Docs\Mapping Specifications\Automation\Automated_Mapping_Specifications.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

End Sub