View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Marco Marco is offline
external usenet poster
 
Posts: 69
Default Unhiding all worksheets

Thanks.

"Paul B" wrote:

Macro, try this,

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

"Marco" wrote in message
...
Someone hid about 50 sheets in a workbook. What would be the code to

unhide
them all without doing it one by one from the Format menu?

Thank you

Marco