VBA - 如何使用if語句關閉自動過濾器

我想要一些能夠在自動過濾器關閉的情況下關閉自動過濾器的代碼。我似乎無法得到它的工作，並沒有找到解決辦法。VBA - 如何使用if語句關閉自動過濾器

感謝，

羅布

2017-02-21 Rob Blagg

想要完全移除過濾器，還是重置它以使所有列都設置爲「全部」？ – CLR

這是我使用的東西。它與硬編碼範圍一起工作，但您也可以將其作爲參數傳遞。非常多，如果有自動過濾器，它將在A2:K2上禁用它。

Public Sub CleanTheFilters() 

    If ActiveSheet.AutoFilterMode Then 
     ActiveSheet.Range("A2:K2").AutoFilter 
    End If 

End Sub

2017-02-21 12:47:26 Vityata

謝謝Vityata，運作良好。 –

歡迎，@RobBlagg – Vityata

回答