MACRO: Hide sheet if cell is empty

Dear programmers,
A huge request 4 MACRO that if detects empty cell A2 hide active worksheet.

Something like that:

Please Login or Register  to view this content.

Spent hours on the project and got stuck on a silly function.
Thanks in advance

Hi karajakatak and welcome to the forum.

Try this:

Please Login or Register  to view this content.

Hi karajakatak and welcome to the forum.

Try this:

Please Login or Register  to view this content.

The above code must go in a Module and not behind a worksheet.

Thank You vary much,
Works perfectly

One more question. I want to select all sheets except first one in this macro:

Please Login or Register  to view this content.

Would you help me? Need to make it work in next 8 hours :D

Hey kara,

I'm so glad you got back to me. I didn't like my first code as it should made sheets hidden if they didn't have stuff in A2. See the new code and example attached.

Sheets can be addressed by Name, Index or the "Each" routines. In the new code used the worksheets.count line to find how many sheets there are and the For .. Next .. routine to do the add-on question.

Also - could you edit your reply above, select the code and click on the "#" button to put the code in a box.

Please Login or Register  to view this content.

(also - thanks for the rep)
VBA Worksheets Each and For Next.xlsm