VBA自动过滤器不限制数据集

Question

我正在根据索引符号重复搜索和复制Excel工作表中的行。数据集不是很大，但由于它们的数据集的性质，索引符号总体上不是唯一的，而是仅在整个数据集的子集内。因此，我决定在数据集上使用AutoFilter将设置减少到每次搜索的适当子集。问题似乎是自动过滤器实际上并没有限制我的搜索数据集，只是在视觉上。

我通过在过滤之后和搜索之前记录每个数据集（假定子集）的最后一行来确定这一点。

With lcr.Range("B1")
    .AutoFilter , field:=2, Criteria1:=A, VisibleDropDown:=True 
    .AutoFilter , field:=3, Criteria1:=B, VisibleDropDown:=True 
    .AutoFilter , field:=4, Criteria1:=C, VisibleDropDown:=True 
End With
r = lcr.Cells(lcr.Rows.Count, "A").End(xlUp).Rows
Debug.Print r

但是，最后一行（r）总是返回整个数据集的值，结果反映了这一点。我在这里错过了什么？如果不是通过过滤，如何暂时将数据集减少到特定子集？

谢谢！