Autofilter

[TW]

Is there a code to turn Autofilter off
I mean: "Selection.AutoFilter" turns it either on or off depending on the status.
I need a code the always turns it off and not on.

[Ricky Morris]

Try this:

Sub FilterOff()
On Error Resume Next
ActiveSheet.ShowAllData
If Err.Description = "ShowAllData method of Worksheet class failed" Then
Selection.AutoFilter
endif
End Sub


_________________
It's never too late to learn something new.

Ricky

[ This Message was edited by: Ricky Morris on 2002-04-17 10:04 ]

[gareth]

Hello buddy

Did you try this already ?

Sub FilterOff()
On Error Resume Next
ActiveSheet.ShowAll
If Err.Description = "ShowAllData method of Worksheet class failed" Then
Selection.AutoFilter
End Sub

[maxlm]

Originally Posted by gareth

Hello buddy

Did you try this already ?

Sub FilterOff()
On Error Resume Next
ActiveSheet.ShowAll
If Err.Description = "ShowAllData method of Worksheet class failed" Then
Selection.AutoFilter
End Sub

Object Doesnt support this property or method Error..