无法创建Access.Application对象

Question

我经常看到这个问题并尝试了所有方法，但是当我在下面的代码下运行时，它给我错误。

我无法弄清楚出什么问题了。

Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")

ActiveX组件无法创建对象。