Greetings and TIA for your time
In my code, I want to test to see if AutoFilter is there on the activesheet.
If it is ,I need to switch it off, do something, then re apply the AutoFilter.
--
David

ActiveSheet.AutoFilterMode

This returns True or False to indicate the status of AutoFilter

John Green

"David" wrote in message
...
Greetings and TIA for your time
In my code, I want to test to see if AutoFilter is there on the
activesheet.
If it is ,I need to switch it off, do something, then re apply the
AutoFilter.
--
David

Code:
--------------------
Sub isItOn()
Dim isOn As Boolean
If Worksheets("Sheet1").AutoFilterMode Then
isOn = True
Else
isOn = False
End If
MsgBox "AutoFilterMode is " & isOn
End Sub
--------------------
The above is taken from Microsoft's help files.
Add in
Code:
--------------------
ActiveSheet.EnableAutoFilter = True
--------------------
etc...and you're there.


--
MartinShort

Software Tester
------------------------------------------------------------------------
MartinShort's Profile: http://www.excelforum.com/member.php...o&userid=22034
View this thread: http://www.excelforum.com/showthread...hreadid=374471

Thanks Martin
--
David

Thanks John
--
David