无法调试MS Access 2013运行时错误91

Question

我似乎无法解除以下运行时错误91.

Dim db As DAO.Database
Dim rs3 As DAO.Recordset

Set rs3 = db.OpenRecordset("SELECT Company, " & _
"StDev(DayLog) As [StDevDayLog], " & _
"Count(Date) As [CountDay] " & _
"FROM Table1 " & _
"WHERE (Date <= #6/1/2013# " & _
"And Date > #6/1/2008#) " & _
"GROUP BY Company;")

有什么建议吗？

Answer 1

在尝试CurrentDb

之前，将对象变量设置为db.OpenRecordset

Set db = CurrentDb
Set rs3 = db.OpenRecordset ...

您的表似乎包含名为 Date 的字段，该字段也是函数的名称。您可以将该名称括起来或使用表名或别名对其进行限定，以避免混淆数据库引擎。