Unhiding All hidden Worksheets with a Macro/VBA Code

R

robertguy

Hi,

Can anyone help me please ?

Whilst working with an Excel Workbook I often hide all unwanted
Worksheets leaving only the ones I need to work on visible.

What I would like to do is have a macro or VBA code to click on a
button to unhide all hidden worksheets rather repeating
Format-Sheet-Unhide to unhide each worksheet.

Any help would be greatly appreciated (Excel version Excel 2000)


Many thanks

Rob
 
B

bigwheel

Try this

Dim mySheet As Worksheet
For Each mySheet In Worksheets
mySheet.Visible = True
Next mySheet
 
Top