Excel VBA中的多重筛选？

我正在尝试使用2列和2个不同的filter要求来过滤我的数据。

ActiveSheet.AutoFilterMode = False ActiveSheet.Range("$K$2:$ZZ$200").AutoFilter Field:=5, Criteria1:="yes" ActiveSheet.Range("E:E").AutoFilter Field:=1, Criteria1:="Low" 

如果我过滤的是，那么它的工作，如果我过滤低也可以。 但是，如果我尝试过滤范围K2-ZZ200的是，然后列E低，它似乎隐藏了一切。

有任何想法吗？

Answer 1

两个AutoFilter语句必须使用相同的Range("$K$2:$ZZ$200") ：

 ' Column A = Field 1 ActiveSheet.Range("$K$2:$ZZ$200").AutoFilter Field:=1, Criteria1:="yes" ' Column E = Field 5 ActiveSheet.Range("$K$2:$ZZ$200").AutoFilter Field:=5, Criteria1:="Low" 

此外，您可能需要设置ActiveSheet.AutoFilterMode = True ，但我不完全确定。

Answer 2

几乎。 pipe理这个使用数组。 范围不需要一样的方式。

  ActiveSheet.AutoFilterMode = False ActiveSheet.Range("$E$2:$ZZ$200").AutoFilter Field:=nice, Criteria1:="yes" ActiveSheet.Range("$E$2:$ZZ$200").AutoFilter Field:=1, Criteria1:=Array( _ "Filter 1", ""Filter 2", "On "Filter 3", ""Filter 4", ""Filter 5"), Operator:=xlFilterValues