How to unhide multiple sheets in one go

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi,

I have multiple sheets in a workbook hidden and at times I need to unhide
them all in one go.

However the problem with the unhide feature is that it only allows you to
unhide one sheet at a time. I have over 22 hidden sheets so this is a real
problem for me.
I've tried doing some VBA but got stuck. Could'nt get it to work.

Anyone done this before or could give me hints

Thanks in advance
Sandra
 
Grd, here is one way,

Sub unhide_all_sheets()

Dim ws As Worksheet

For Each ws In Worksheets

ws.Visible = True

Next ws

End Sub
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003
 
Great Paul

That does the trick

Paul B said:
Grd, here is one way,

Sub unhide_all_sheets()

Dim ws As Worksheet

For Each ws In Worksheets

ws.Visible = True

Next ws

End Sub
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003
Click to expand...
 
Back
Top