Using VBA to hide rows based on what month you specified.

[figuare9]

I have a bunch of data between A12:T1499


I have a bunch of dates starting at the first of the year through the entire year in Column F. Called "Date Order Received" F12:F1499

These are the dates that I'm trying to use to "sort".

I have 12 command buttons that have each month on them. So what I'm trying to do is be able to click on the "January" button, and have excel hide all rows that don't have January in the date order received. This way it should only display January Orders. And so forth, for each month.

So in a nutshell, Search F12:F1499 for any month that has January, and hide every row that doesn't include these months.

 

[figuare9]

After sorting with the other buttons, I can't seem to use the Show All button again. Any idea why? The months work with show all.. But not the show only completed, and the due buttons

 

[Fluff]

Ok, change it to

ActiveSheet.showAlldata

 

[figuare9]

Thanks again! It ended up giving me an error, so I had to change it

[COLOR=#101094][FONT=inherit]If[/FONT][/COLOR][COLOR=#303336][FONT=inherit] [/FONT][/COLOR][COLOR=#303336][FONT=inherit]([/FONT][/COLOR][COLOR=#303336][FONT=inherit]ActiveSheet[/FONT][/COLOR][COLOR=#303336][FONT=inherit].[/FONT][/COLOR][COLOR=#303336][FONT=inherit]AutoFilterMode [/FONT][/COLOR][COLOR=#101094][FONT=inherit]And[/FONT][/COLOR][COLOR=#303336][FONT=inherit] ActiveSheet[/FONT][/COLOR][COLOR=#303336][FONT=inherit].[/FONT][/COLOR][COLOR=#303336][FONT=inherit]FilterMode[/FONT][/COLOR][COLOR=#303336][FONT=inherit])[/FONT][/COLOR][COLOR=#303336][FONT=inherit] [/FONT][/COLOR][COLOR=#101094][FONT=inherit]Or[/FONT][/COLOR][COLOR=#303336][FONT=inherit] ActiveSheet[/FONT][/COLOR][COLOR=#303336][FONT=inherit].[/FONT][/COLOR][COLOR=#303336][FONT=inherit]FilterMode [/FONT][/COLOR][COLOR=#101094][FONT=inherit]Then[/FONT][/COLOR]<code style="margin: 0px; padding: 0px; border: 0px; font-style: inherit; font-variant: inherit; font-weight: inherit; font-stretch: inherit; line-height: inherit; font-family: Consolas, Menlo, Monaco, "Lucida Console", "Liberation Mono", "DejaVu Sans Mono", "Bitstream Vera Sans Mono", "Courier New", monospace, sans-serif; vertical-align: baseline; box-sizing: inherit; white-space: inherit;">[COLOR=#303336][FONT=inherit]  ActiveSheet[/FONT][/COLOR][COLOR=#303336][FONT=inherit].[/FONT][/COLOR][COLOR=#303336][FONT=inherit]ShowAllData [/FONT][/COLOR]</code>[COLOR=#101094][FONT=inherit]End[/FONT][/COLOR][COLOR=#303336][FONT=inherit] [/FONT][/COLOR][COLOR=#101094][FONT=inherit]If[/FONT][/COLOR]

But I was able to google your answer for some help. Thank you again. You're a life saver!

 

[Fluff]

Glad you got it sorted & thanks for the feedback