如何从vba中的ADODB.Recordset进行过滤

时间:2016-12-26 10:56:03

标签: excel-vba vba excel

我在我的vba程序中使用ADODB.Recordset,从表到记录集加载所有记录,并希望根据循环(i值)过滤循环内的记录。

我使用下面的代码来过滤记录集中的记录:

for (dim i as integer = 1 to 10)
    rsContacts.Filter = "Name = '" & Cell(i,1) & "' and Id = '" & Cell(i,2)& "'"
next

它在i = 1时正确返回一条记录,但i = 2记录集没有任何记录。如何过滤记录,但希望保留完整的记录集,以便它能正确过滤?

1 个答案:

答案 0 :(得分:1)

也许你需要添加代码才能移动到第一条记录。  rsContacts.MoveFirst

另一个建议是事先清除过滤器  rsContacts.Filter = adFilterNone