VBA for sorting and showing only selected criteria

[kbishop94]

Hello... ok, here is what I need, hopefully someone here has something that will work to offer
I would like to have a button (as shown below in the screen shots) that when selected will sort and only show the columns with “SR” (as listed in row 3) It would hide ALL the other columns except the ones with SR in row 3… (I would then duplicate the code and have several other buttons that would do the same thing depending on what was listed in row 3, such as "CG", "PK", etc.


Here is a screen shot of an example of how it looks BEFORE hitting the button:


Here is what I need to obtain after the "Show SR" button is selected:


(Note that I also have existing code already in place that already hides every-other-column.. that's what the "Show Dates" button does.)

 

[rpaulson]

trythis

For Each cell In Range("C3:Z3").Cells
If cell = "SR" Then Columns(cell.Column).Hidden = False Else Columns(cell.Column).Hidden = True
Next

 

[kbishop94]

Thanks! That worked... but how do I make it so when I 'deselect' the button it will go back to showing all again?

 

[kbishop94]

btw... I replied to this thread just a minute or 2 before it went down for Maintenance... and now that reply is gone(?) DId it get deleted or was it due/related to what happened yesterday with the boards going down?

 

[rpaulson]

Unhide

Unhide macro:

For Each cell In Range("C3:Z3").Cells
Columns(cell.Column).Hidden = False
Next

 

[kbishop94]

Perfect! Thanks