Vba 摆脱。选择?

Vba 摆脱。选择?,vba,excel,Vba,Excel,是否有一种方法可以摆脱。请在下面的代码中选择 ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3, Criteria1:="1" Range("C3").Select Range(Selection, Selection.End(xlDown)).Select Selection.NumberFormat = "00" ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3 Range

是否有一种方法可以摆脱。请在下面的代码中选择

ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3, Criteria1:="1"
Range("C3").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.NumberFormat = "00"
ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3
Range("A1").Select
当然可以:


有关更多详细信息,请参见

@CC268,这样一个简单的问题无疑在互联网上拥有大量的资源。最好的学习方法是不要让其他人给你答案。投票被否决,因为你在发布问题之前没有对此进行研究。一个问题涵盖了这一问题的很多方面:。编辑:未看到,但@SeanC已引用此链接。
ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3, Criteria1:="1"
Range(Range("C3"), Range("C3").End(xlDown)).NumberFormat = "00"
ActiveSheet.Range("$A$2:$AI$5000").AutoFilter Field:=3