在VBA上创建自动筛选器时出现问题,无法在线查看。
我正在尝试根据条件(>数字)自动过滤数据表。但是,当我运行代码时,我可以看到VBA除了我希望的条件大于“ x”之外,还添加了附加条件“以(空白)开头”
ActiveSheet.AutoFilterMode = False
rng.AutoFilter Field:=4, Criteria1:=">" & VolumeMin.Value, _
Operator:=xlAnd
rng.AutoFilter Field:=3, Criteria2:=">" & MarketCap.Value _
, Operator:=xlAnd
End Sub
有人可以指出是什么导致VBA造成此额外的不良状况吗?谢谢
您正在使用Criteria2:=
时Field:=3
未指定Criteria1:=
。因此,Excel使用的Criteria1:=
是“开始于”的“默认值”。
尝试以下代码:
ActiveSheet.AutoFilterMode = False
rng.AutoFilter Field:=4, Criteria1:=">" & VolumeMin.Value, _
Operator:=xlAnd
rng.AutoFilter Field:=3, Criteria1:=">" & MarketCap.Value, _
Operator:=xlAnd
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句