声明Excel.Application对象后出现“Object Required”错误

时间:2013-06-28 12:42:21

标签: excel-vba vbscript vba excel

在编写VBScript以在Excel外部运行宏时,我收到“需要对象”错误。代码在此消息下方。声明xlApp = CreateObject("Excel.Application")后,对xlApp对象的任何尝试操作都将引发“需要对象”错误。

我在声明声明中遗漏了什么,或者我需要做某种导入/包含声明?

Sub temp()

  Dim xlApp, xlBook
  Dim oShell: Set oShell = CreateObject("WScript.Shell")
  oShell.CurrentDirectory = "H:"
  MsgBox (oShell.CurrentDirectory)

  xlApp = CreateObject("Excel.Application")
  xlApp.Visible = True 'error is thrown here
  xlBook = xlApp.Workbooks.Open("H:\SW Tool Resources\test\tester.xlsm")
  MsgBox ("Success")

End Sub

1 个答案:

答案 0 :(得分:3)

您需要将Set对象变量Set xlApp = CreateObject("Excel.Application") 到新的Excel实例:

{{1}}