引用多个单元VBA自动过滤器

Question

我使用以下代码将自动过滤器应用于范围，并通过查找多个参考单元格中包含的相同值来过滤其中一列：

Sub filter()

Range("B6:N9000").AutoFilter Field:=2, Criteria1:=Array(Range("C2").Value, Range("D2").Value, Range("E2").Value )

End Sub

然而问题是过滤器仅应用代码中引用的最后一个单元，即在上面它只查找＆＃34; E2＆＃34;而不是＆＃34; C2＆＃34; ＆安培; ＆＃34; D2＆＃34; ＆安培; ＆＃34; E2＆＃34;

有什么建议吗？感谢

Answer 1

在此基础上给出答案：您希望将参数Operator:=xlFilterValues添加到您的通话中，所以它看起来像这样：

Range("B6:N9000").AutoFilter Field:=2, Criteria1:=Array(Range("C2").Value, _
    Range("D2").Value, Range("E2").Value), Operator:=xlFilterValues

或

[B6:N9000].AutoFilter Field:=2, _
    Criteria1:=Array([C2].Value, [D2].Value, [E2].Value), Operator:=xlFilterValues