Question

我在VBA上创建一个无法解决的自动过滤问题时遇到问题。

我正在尝试根据条件（＆gt;数字）自动过滤数据表。但是当我运行我的代码时，我可以看到VBA已经添加了一个附加条件＆＃34;开始使用（空白）＆＃34;除了我想要的条件大于＆＃34; x＆＃34;

ActiveSheet.AutoFilterMode = False
rng.AutoFilter Field:=4, Criteria1:=">" & VolumeMin.Value, _
    Operator:=xlAnd
rng.AutoFilter Field:=3, Criteria2:=">" & MarketCap.Value _
    , Operator:=xlAnd
End Sub

有人能指出导致VBA造成这种额外不需要的情况的原因吗？谢谢

Answer 1

您在Criteria2:=上使用Field:=3而未指定Criteria1:=。因此，Excel使用＆＃34;默认＆＃34; ＆{34;}的Criteria1:=与＆＃34;开始。

请尝试以下代码：

ActiveSheet.AutoFilterMode = False
rng.AutoFilter Field:=4, Criteria1:=">" & VolumeMin.Value, _
    Operator:=xlAnd
rng.AutoFilter Field:=3, Criteria1:=">" & MarketCap.Value, _
    Operator:=xlAnd

VBA - 自动过滤器创建了附加条件

1 个答案: