VBS运行启用宏的工作簿错误800A9C68

Question

我在互联网上拼凑的VBS脚本有一个小问题。

Dim xlApp, xlBook


Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
Set xlBook = xlApp.Workbooks.Open("LOCATION", 0, True)


xlapp.Visible = True

xlApp.Run "RefreshAdj"

xlBook.Close False
set xlBook = Nothing

xlApp.Quit
Set xlApp = Nothing

WScript.Echo "Finished."
WScript.Quit

它将运行任务计划程序，但始终会出现此错误。

Line: 11
Char: 1
Error: Unknown runtime Error
Code: 800A9C68
Source: Microsoft VBScript runtime Error

这没什么大不了的，但是有点烦人，因为它不会在第二天运行，直到有人清除此错误的对话框。

任何帮助。

Answer 1

我在一个脚本中遇到了同样的问题，在该脚本中，我更新了工作表中的数据，用不同的名称保存了文件，然后做了

ActiveWorkbook.Close

我认为问题在于，通过使用不同的名称保存文件，Excel会混淆ActiveWorkbook是什么。我在ThisWorkbook中遇到了相同的错误。

Answer 2

我有一个与此类似的问题。大卫的回答帮助我提出了解决方案。我没有更改文件名，但通过Excel将文件保存在VBA中。我通过vbscript而不是通过VBA保存了文件，并且错误不再出现。