我创建了一个 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”中工作