Question

我的所有脚本都停止工作并返回800a0007 Out of Memory运行时错误。直到今天一切都很好。系统没有重大变化（Win 7 64bit），我甚至卸载了最新的更新。

基本上，脚本打开Excel实例，然后打开工作簿并刷新所有ODBC和Pivots。打开excel和工作簿工作正常，当脚本试图对工作簿执行某些操作时会出现问题。

我编写了简单的代码（它打开了空的现有excel文件），在这种情况下，第8行出现错误：设置oWorkbook = .Workbooks（workbookName）。

excelFileLocation = "D:\files\"
workbookName = "test.xlsx"
Set oExcApp = CreateObject("Excel.Application")
With oExcApp 
    .Application.DisplayAlerts = False
    .Application.ScreenUpdating = False
    .Workbooks.Open excelFileLocation & workbookName
    Set oWorkbook = .Workbooks(workbookName)
    .Application.Quit
End With

磁盘上有足够的空间，物理内存，分页文件......从System32和SysWOW64运行cmd / cscript时出错。

当然我可以手动运行Excel，打开工作簿，刷新所有内容，保存文件，一切正常。

请帮我解决这个问题..

Answer 1

我已经找到了解决方案 - 奇怪的故事......

我在Windows事件查看器中检查了应用程序日志。有日志说Skype for Business已经卸载了。另一个日志说，在同一时间和MsiInstaller也触发了配置Office组件和其他一些MS Office的事情。

所以，我禁用了WMI服务（我之前已经重新启动了WMI，但没有任何改动），再次安装Skype以强制重新配置一些东西，重启机器并启动WMI服务。现在一切都好。

看起来删除Skype for Business是一个重大变化:)或者只是巧合......

VBS Excel.Application.Workbooks运行时错误800A0007内存不足

1 个答案: