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


"Grd" wrote in message
...
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

Great Paul

That does the trick

"Paul B" wrote:

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


"Grd" wrote in message
...
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