8

我创建了一个 Excel 宏,在其中我使用 Microsoft.Jet.OLEDB.4.0 在 Excel 工作表上触发查询。

它在我的机器上运行完美,但我的客户遇到了问题。(请参阅随附的屏幕打印)

客户收到此错误

我在程序中添加的参考资料

以下是我的连接对象的详细信息:

Dim cn
Set cn = CreateObject("ADODB.Connection")
With cn
    .Provider = "Microsoft.Jet.OLEDB.4.0"
    .ConnectionString = "Data Source=" & ThisWorkbook.FullName & "; Extended Properties=Excel 8.0"
    .Open
End With

请注意:我必须使代码在“Windows 7”中工作

4

1 回答 1

13

提供程序将在 Window 7 Office x64 上失败,因为该平台不支持提供程序。

您需要安装 x64 Microsoft Access Database Engine 2010 Redistributable并将连接字符串更改为Provider=Microsoft.ACE.OLEDB.12.0

于 2012-09-19T13:11:37.043 回答