excel - 运行 Excel 宏 VBScript 时出错

Question

从 AutoSys 运行作业时出现错误。VBS 运行 Excel 宏。VBS代码:

Option Explicit

Dim xlApp, xlBook
Set xlApp = CreateObject("Excel.Application")
On Error Resume Next
set xlBook = xlApp.Workbooks.Open("Z:\Confidential Restricted\Weekly_HR_Employees_Macro.xlsm",0, False)
xlApp.Run "Weekly_HR_Employees_Macro.Weekly_HR_Employees_Macro"
xlBook.Close True
xlApp.Quit

set xlBook = Nothing
Set xlApp = Nothing

错误:

Microsoft VBScript runtime error: ActiveX component can't create object: 'Excel.Application'

Answer 1

您正在将 GetObject 语法与 CreateObject 方法结合使用。您需要使用:

Set xlApp = CreateObject("Excel.Application")

检查this回答以获取更多详细信息。