Hide and Unhide sheets based on Date [better code]

[Deryl]

Hi, guys!

today I want to ask for your help to optimize my code.
I have UserForm where user select the type of update: Daily or Weekly (option buttons).
There is a 7 sheets of weekdays (Mon, Tue, Wed ....) in that workbook and When update is done i need them hide and unhide based on:
1st witch update is selected
2nd on witch day of week the Daily update is made.

I had wrote this Sub for this job, witch works great, but I'm looking at it and have this feeling - it's too big, is there a way to make it smaller/simpler?
Ok, maybe it's simple enough but smaller would be great.
Question is: is it possible?
Thank you for reading all this.
Here is the code:

Please Login or Register  to view this content.

[event21]

Hi -

Hide them all initially;

Please Login or Register  to view this content.

[Deryl]

I forgot to mention that these weekday sheets are in a middle of many other sheets. If it's important.
I managed to think of how to make it smaller, at least a little bit. By removing empty rows in it [joke].

My WB sheets system is something like this:
1-5 sheets - charts, tables of data (always visible)
6-12 sheets - weekdays charts (need to show/hide based on data available)
13 - last sheet - data sheets (always hidden)

So I thought that if I put this few lines in the begging of code:

Please Login or Register  to view this content.

I can get rid of all lines where I set sheet's visibility to FALSE later in code!

[Deryl]

It looks like we posted at the same time, mate
It's always nice when someone confirms your thoughts
Thanks, event21!