具有多个标准的高级filter

我希望结合两个先进的filter，似乎无法得到正确的。

目标是过滤只有列表中的FIN和列表中的用户ID的行。 以下是个别的filter。

当我顺序运行它们时，只会应用最后一个filter。

' Filter by FINs LastRow2 = Sheets("FINs").Cells(Rows.Count, 1).End(xlUp).Row Sheets("Data").Columns("B:B").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ Sheets("FINs").Range("A1:A" & LastRow2), Unique:=False ' Filter by userID LastRow3 = Sheets("Users").Cells(Rows.Count, 1).End(xlUp).Row Sheets("Data").Columns("C:C").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ Sheets("Users").Range("A1:A" & LastRow3), Unique:=False 

谢谢！

Answer 1

我有与AutoFilter类似的问题，然后传递数组（FIN 1，FIN 2，..）和arrays（用户1，用户2，…），但它不能正常工作。

例如，

我想在列A中只有FIN 1的列表，那么列B必须是用户1但是结果不是，只要列A有FIN 1它将在列表中。 自动filter将返回这两个数组中可能的所有组合。

我build议添加一个唯一列，然后使用唯一列进行过滤。 然后使用arraysfilter使用自动筛选如下：

 ActiveSheet.Range("$A$1:$C$7").AutoFilter Field:=3, Criteria1:=Array("FIN 2|User 2", "FIN 4|User 4", "FIN 5|User 5", "FIN 6|User 6"), Operator:=xlFilterValues