没有在计算机上安装Access 2016的Excel中的呼叫访问功能

Question

在计算机上未安装Access的情况下是否可以从Excel VBA调用Access函数？

我尝试过：

Sub RunAccessSubLateBinding()

    Dim objAccess As Object
    Dim dbPath As String
    dbPath = ThisWorkbook.Path & "\Database141.accdb"

    Set objAccess = CreateObject("Access.Application")
    objAccess.OpenCurrentDatabase dbPath

    objAccess.Run "HelloWorld"

End Sub

它可以在我的PC（已安装Microsoft Access）上运行，但不能在未安装Access的用户上运行。

Answer 1

您无法创建不存在的应用程序实例。

对于Microsoft Access，至少要安装一个运行时（免费）。

Answer 2

最大的问题是您为什么要这么做？ “访问”是基础数据库引擎的GUI，从广义上讲，仅包含表单和报告。基础查询和表由Windows（而不是Access）安装的引擎控制。因此，您可以使用ADO或DAO技术使用Excel来操作和查询数据库，而无需Access。