使用多个标准的VBA自动过滤器

Question

全部，

我正在尝试过滤VBA中的多个条件。

但是我找不到一种简单的方法。我选择的标准总是不变但大于2，因此我不能使用或运算符。

以下代码;

Selection.AutoFilter field:=10, Criteria1:=Array("Fixtures & Fittings", "Furniture & Equipment", "Land & Buildings", "Motor Vehicles", "Plant & Machinery")

我当前的解决方案仅过滤数组中的最后一个条件。

由于文件设置，我无法在另一列中插入公式。

由于

Answer 1

您需要运营商：= xlFilterValues。

Selection.AutoFilter field:=10, Operator:=xlFilterValues, Criteria1:=Array("Fixtures & Fittings", "Furniture & Equipment", "Land & Buildings", "Motor Vehicles", "Plant & Machinery")

如果标准是常数，我会假设过滤器范围也是一致的。您可能希望在不久的将来不再使用Selection。请参阅How to avoid using Select in Excel VBA。