Question

让我问我的问题，我只是vba的初学者。我必须使用条件

过滤列

<>array ("0402", "0603", "0805", "1206").

我尝试了这个，但是对我不起作用：

Rows (1).AutoFilter Field:=9, Criteria1:=Array("=<>0402", =<>0603", "=<>0805", "=<>1206"), Operator:=xlFilterValues

有关信息，列字段9中的值是右文本功能的粘贴值。那么我必须定义角色吗？是文字还是数字？数组呢？

Answer 1

您只能使用两个不等于标准的值。请参阅以下帖子，以获取更多清晰信息

Autofilter for multiple not equal values

Answer 2

公共子RENAME _（）

    Dim d1() As Variant: d1 = Array("0402", "0603", "0805", "1206")

    Dim r As Range: Set r = Cells(1, 1).CurrentRegion

    r.AutoFilter Field:=1, Criteria1:=d1, Operator:=xlFilterValues

End Sub

如何使用<>数组条件

2 个答案: