自动过滤器用于多个不相等的值

时间:2015-11-13 05:00:11

标签: excel vba excel-vba

我正在为excel表添加autofilter,如下所示。

With Sheets("Sheet1")
With .ListObjects("Summary").Range
    .AutoFilter Field:=1, Criteria1:=">400000", Operator:=xlOr, Criteria2:=Array("<>440400", "<>440600", "<>440300")
    .AutoFilter Field:=5, Criteria1:=">110", Operator:=xlAnd, Criteria1:="<105"
    .SpecialCells(xlCellTypeVisible).Copy
End With
End With

n结果我的值大于400000。但是我的结果也是440400,440600和440300。如何添加两个过滤器?

2 个答案:

答案 0 :(得分:1)

到目前为止,据我所知,它无法完成。

我的工作:

1)突出显示符合条件的记录,逐个循环

2)然后按Higlight过滤

希望这有帮助!

答案 1 :(得分:0)

我知道这不符合您的确切规格(我不确定优先顺序,所以我只是做了),但这应该有效:

在表格中添加一个字段作为公式,类似于:

app/views/admin/...

同样,我完全基于您拥有的值来做到这一点,所以我意识到它不一致,实际的字段名称也不匹配。

然后,让您的vba代码过滤到这个新的列/字段。