QueryTables错误

我在Excelmacros中有以下VBA代码：

With ActiveSheet.QueryTables.Add( _ Connection:=ConnStr, _ Destination:=ActiveSheet.Range("A1"), _ Sql:=SqlStr) .Refresh End With 

但是我得到错误：“运行时错误'1004'：应用程序定义或对象定义的错误。” debugging器指向这个代码作为错误的来源。

假设我的ConnStr和SqlStr是正确的，为什么我得到这个错误？ 我正在使用Excel 2007，我正在查询Oracle数据库。

Answer 1

感谢Adam的回复。 我设法解决这个问题。 问题是我的连接和SQLstring。 我需要在我的连接string前添加“ODBC”，然后我需要向我的SQLstring中添加一些空格。 我忘了是哪个造成了这个错误。