Question

我想通过触发存储在MsAccess中的查询来获取excel VBA中的记录集。

当我添加适当的SQL查询时，代码工作正常，但我想避免将查询添加到代码中，我想使用存储在MSACCESS中的查询。

sql = "select * from qryUploadData"
With RS
        .ActiveConnection = conn
        .CursorType = adOpenStatic
        .LockType = adLockOptimistic
        .Open sql
End With

qryUploadData是访问查询的名称。如果我将它当作一个表放入SQL查询中，则可以正常运行，但是如果我尝试直接将其打开，则不会。有什么使用方法吗？

Answer 1

我认为我先前的评论对此进行了解释，但是如果它有点模糊，则将查询名称作为sql命令调用应该会导致该查询在Access中运行。您应该能够：

sql = "qryUploadData"
With RS
        .ActiveConnection = conn
        .CursorType = adOpenStatic
        .LockType = adLockOptimistic
        .Open sql
End With

使用查询创建adodb RecordSet

1 个答案: