Command Button to Hide rows based on a date range in Column A

In one spreadsheet, I want to have a command button that will hide all rows where the date column (column A) shows a date older than one week from today. When this button is clicked again, all rows will unhide again. Preferably the Command button title would change to reflect whether it is on the hide or show cycle (for example "Click to Hide all older than one week" and then "Click to Show all events")

I know very little VBA code. Thanks.

Please Login or Register  to view this content.

Thank you stnkynts. I don't know how to program the command button however, with the code. Can you explain how to accomplish this?

I got this to work, at least part of my original request. When tied to a command button, this code does indeed hide all records where the date is not from the past 7 days. It is fairly slow process, as it looks at every row individually and decides whether to hide the row or not. The spreadsheet it will be used for could have a lot of records, so this process will eventually take a lot of time to complete. Is there a quicker process than this? Also, I was hoping for the button to be programmed with a title that would say "Show Last Week" but after clicked the title would change to "Show All" and when clicked again, would reverse the hiding process.

This is the code I have now. The original button was not Active X (didn't know the difference) but this one is. Tested it on only 17 rows and it took about 6 seconds. The button does change its caption based on how many times you click it, but when it is showing "Show All" it does not unhide the cells that were hidden on the first click. I really appreciate this. I've only really ever attached a macro to a button, never code.

Please Login or Register  to view this content.

Submit your workbook.

Here it is New Trending Logs.xlsm

That is perfect. Thank you so much.