VBA - 自動過濾器創建附加條件

Question

我在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創造這個額外的不受歡迎的條件？謝謝

Answer 1

您在Field:=3上使用Criteria2:=而未指定Criteria1:=。因此，Excel使用「開始」的「默認」Criteria1:=。

試試下面的代碼：

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