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

回答