excel VBA将查询中的参数传递给ADO连接“1004”：应用程序定义或对象定义的错误

hl0ma9xz 于 2023-01-31 发布在其他

关注(0)|答案(1)|浏览(129)

在命令文本中，我似乎无法使用参数作为表名，因此我现在尝试将其硬编码到VBA查询中，但我遇到了“1004”：应用程序定义或对象定义的错误。附件是我正在使用但似乎不起作用的命令文本的屏幕截图。我添加的以下代码导致了该错误：The Connection Properties pop up box

With ActiveWorkbook.Connections("Query1").OLEDBConnection
        .BackgroundQuery = True
        .CommandType = adCmdText
        .CommandText = "SELECT * FROM [DBO].[Refresh_" & UserName & "] ORDER BY [Item No];"
End With

我将感谢任何人可以给予我关于查询“连接”属性框或vba代码的任何帮助。
先谢了保罗

excel

来源：https://stackoverflow.com/questions/75261145/vba-passing-parameter-in-query-to-ado-connection-1004-application-defined-or

1条答案

按热度按时间

fnx2tebb1#

根据您设置连接的方式，它将具有ODBCConnection或OLEDBConnection属性（但不能同时具有这两个属性）。
如果您稍微分解一下代码，就可以监视连接并查看填充了哪些属性：

Sub Tester()
    
    Dim conn As WorkbookConnection 'put a Watch on this and step through....
    
    Set conn = ThisWorkbook.Connections("TestQuery")
    
    With conn.ODBCConnection
            .BackgroundQuery = True
            .CommandType = xlCmdSql    '<<<<  not adCmdText
            .CommandText = "select * from ops$rs3.hts_scientist"
    End With

End Sub

监 windows 口：

赞(0）回复(0）举报 2023-01-31

我来回答

excel VBA将查询中的参数传递给ADO连接“1004”：应用程序定义或对象定义的错误

1条答案

相关问题

热门标签

最新问答