使用 3 个或更多条件过滤

【问题标题】：Filter with 3 and more criteria使用 3 个或更多条件过滤
【发布时间】：2014-04-19 10:04:13
【问题描述】：

大家好！
我非常需要使用具有 3 个条件的过滤器，但默认情况下只有 2 个。那么如何使用标准 excel 或 vba 找到包含“AGD”或“mrk”或“宏”的单元格（在某些列中）？提前谢谢

【问题讨论】：

您需要传递一个Array("AGD, "mrk, "macro") 作为过滤器的参数并按值过滤。
@mehow 谢谢，但是按值过滤在哪里？我已经尝试将它用于文本过滤器，但它不起作用:)

【解决方案1】：

Seya，设置正确的范围和字段，然后试试这个

Sub FilterByMoreThanTwo()

  Range("A1:C1").AutoFilter ' set your range

  Range("A1:C1").AutoFilter Field:=1, Criteria1:=Array("AGD", "mrk", "macro"), _ 
                              Operator:=xlFilterValues

End Sub

或者如果您希望能够使用由变量组成的数组变量

Sub FilterByMoreThanTwo()

    Range("A1:C1").AutoFilter ' set your range

    Dim arr(3) As String
    arr(0) = "AGD"
    arr(1) = "mrk"
    arr(2) = "macro"

    Range("A1:C1").AutoFilter Field:=1, Criteria1:=arr, Operator:=xlFilterValues

End Sub

【讨论】：