View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.misc
Mel Mel is offline
external usenet poster
 
Posts: 74
Default Clearing Multiple Filters?

Thank you but I seem to be having issues making the "code" work. I'm not
very familiar with writing macros. This is what I have so far:

Dim r As Long, LastRow As Long
Sheets("SE Variance").Select
LastRow = Sheets("SE Variance").UsedRange.Rows(Sheets("SE
Variance").UsedRange.Rows.Count).Row
For r = LastRow To 2 Step -1
Rows(r).EntireRow.Hidden = False
Next r
Sheets("SE Variance").Select
End Sub

It seems to be working however it still does not reset my filter boxes back
to all. It is releasing my filters but not putting them back to 'all'. Do
you have any suggestions on how to link your "code" in with what I have
above? Any help would be greatly appreciated!!! Thank you!!!!

"Wigi" wrote:

You could indeed use a commandbutton with this bit of code:


If ActiveSheet.FilterMode Then
ActiveSheet.ShowAllData
End If

Change Activesheet if the autofilter is not on the active sheet.

Below this code, you can have some code to update the other results / charts
/ sheets, whatever.


--
Wigi
http://www.wimgielis.be = Excel/VBA, soccer and music


"Mel" wrote:

I have data with numerous col's that can be filtered on. I've also built
graphs to drive off of this filtered data along with a list on the graph
pulling in what data is being filtered on. If I go back to my data tab to
clear all filters (menu bar - data/filters/clear all filters) this will not
update my list that i pulled on my graphs. My question is, is there a macro
out there that i can use to clear my filters? Maybe linking it to a button?