MS Access无法打开和分配Excel对象

Question

Excel文件不会在MS Access中打开。

这段代码一直运行到几天前。现在，它不会出错，也不会创建任何Excel对象。

Dim XL As Object
Set XL = New Excel.Application
XL.workbooks.Open(ourPath)

对象分配应该可以正常工作（路径是正确的，我已经检查了多次）。

Answer 1

由于您使用的是早期绑定，因此可能缺少对Microsoft Excel对象库（ Tools > References ）的引用，或者此库已被呈现为MISSING在早期版本的MS Access中打开数据库的结果。

尽管如此，为避免完全依赖引用并将其排除为可能的原因，您可以尝试使用后期绑定，例如：

Dim XL As Object
Set XL = CreateObject("Excel.Application")
XL.Workbooks.Open(ourPath)

Answer 2

所以发生了什么事，excel文件中的加载项阻止了excel的正确打开。一旦禁用了这些加载项，该代码便像灵符一样工作。