conditional unfilter auto filter

[jordanburch]

Hey all! Happy Friday!

I have the below. IT basically checks for a filter and if there is one it takes it away. Its not working though on some new code, it seems to work fine on other code. The error message is there is no filter on the currently selected sheet fyi

compile error unvalid or unqualified reference

any ideas?

Jordan


If .AutoFilterMode Then
If .FilterMode Then
.ShowAllData
End If
Else
If .FilterMode Then
.ShowAllData
End If
End If
End With

 

[jordanburch]

i fixed it for those wondering. before each period I needed to reference the sheet

activesheet.autofiltermode

and i added it down before each period in the code.

Jordan

 

[rhombus4]

You have got end with at the end of your code
Have you removed with at the start

I.e.
With activesheet

Filters

End with

 

[jordanburch]

oh duh right i must not have copied everything correctly lol. THANKS!