AdvancedFilter 排除 Excel VBA 中的多个条件

Question

我一直在尝试使用 VBA 的高级筛选方法来排除一组条件。这是一个简化的例子。

我的标准存储在工作表“标准”中。

我现在要过滤数据，以便排除任何包含名称“Joe”或工作“Pilot”的条目。我尝试了以下方法：

Sub filter_data()
 With Worksheets("Data")
  .Activate
  .Range("A1:C10").AdvancedFilter _
  Action:= xlFilterInPlace, _
  CriteriaRange:= Worksheets("Criteria").Range("A1:C3")
 End With
End Sub

我检查了如果我不使用 <> 运算符，我的代码是否过滤了数据。这就像一个魅力，只包括包含“Joe”或“Pilot”的条目。但是，排除上述条目不起作用。有人可以帮忙吗？

Answer 1

因为您正在寻找您想要的负片而不是 Or。

然后在A2中输入：<>Joe

然后在C2中输入：<>Pilot

所以看起来像这样：

然后将引用更改为仅两行：

Sub filter_data()

    With Worksheets("Data")
        .Range("A1:C10").AdvancedFilter _
        Action:=xlFilterInPlace, _
        CriteriaRange:=Worksheets("Criteria").Range("A1:C2")
    End With
End Sub

AdvancedFilter 排除 Excel VBA 中的多个条件

AdvancedFilter to exclude multiple criteria in Excel VBA

excel

vba

excel-formula

excel-2019