geebee, this should do what you want

Sub filtertest()
With ActiveSheet
.AutoFilterMode = False
End With

End Sub

But if you do want to test it.......
Sub filtertest2()
With ActiveSheet
If .AutoFilterMode Then
MsgBox "Autfilter is on"
Else
MsgBox "Auto Filter Is Off"
End If
End With
End Sub


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"geebee" (noSPAMs) wrote in message
...
hi,

I would like to know the code to determine whether or not the autofilter
is
enabled, and if it is, to turn it off. If it is not turned on, it should
remain off.

Thanks in advance,
geebee