AutoFilter removal
 

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

AutoFilter removal
 

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

AutoFilter removal
 

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

AutoFilter removal
 

Thanks Martin
--
David

AutoFilter removal
 

Thanks John
--
David