结合vba过滤器

时间:2018-01-03 13:24:54

标签: vba excel-vba excel

有没有人知道如何组合这两行,以便在运行包含橙子的代码行时不会出现。目前,只有第一个过滤器正在工作。所以我得到了所有苹果,但第二个过滤器没有。

提前致谢!

ActiveSheet.Range("B4", Range("BT4").End(xlDown)).AutoFilter Field:=24, 
Criteria1:= "Apples"

ActiveSheet.Range("B4", Range("BT4").End(xlDown)).AutoFilter Field:=20, 
Criteria1:="<>Oranges", Operator:=xlAnd

编辑:解决方案 - 我需要做的是放置&#34; *&#34;在橘子周围,因为我想过滤掉任何包含“#34;橘子&#34;”字样的内容。

With ActiveSheet
        .AutoFilterMode = False
        .Range("B4", Range("BT4").End(xlDown)).AutoFilter
        .Range("B4", Range("BT4").End(xlDown)).AutoFilter field:=24, 
        Criteria1:="Apples"
        .Range("B4", Range("BT4").End(xlDown)).AutoFilter field:=20, 
        Criteria1:="<>*Oranges*"
End With

0 个答案:

没有答案