2015-04-28 41 views

回答

2

你几乎拥有它,但你需要使用xlAnd这样的:

ActiveSheet.ListObjects("Table").Range.AutoFilter Field:=8, 
    Criteria1:="<>0", Operator:=xlAnd, Criteria2:="<>" 

默认Operator说法是xlAnd如此你可以省略也是

ActiveSheet.ListObjects("Table").Range.AutoFilter Field:=8, _ 
    Criteria1:="<>0", Criteria2:="<>" 
相关问题