VBA 使用多个条件自动筛选

VBA Autofilter Using Multiple Criteria

所有,

我正在尝试根据 VBA 中的多个条件进行过滤。

但是我找不到一个简单的方法来做到这一点。我选择的标准将始终不变但大于 2,因此我不能使用 or 运算符。

下面的代码;

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

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

由于文件设置的原因,我无法在另一列中插入公式。

谢谢

您需要运算符:=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