Unhide Multiple Worksheets At Once

[Val Steed]

How do you unhide mutilple worksheets with one command instead of worksheet
by worksheet?

Val Steed
(e-mail address removed)

 

[YESHWANT]

Hi Val Steed,

in Excel, you can hid all but one sheets in a workbook in a single stroke
thru :
on the sheet tab, right click and "select all sheets" and the deselect the
sheets which are not to be hidden with regular click of the mouse on
the/those sheets, and then click on format-sheet-hide and your desired
results are achieved.

click yes below, if it helps

 

[Val Steed]

Sorry but no. I am looking for a way to unhide a group of worksheets all at
once. What you describes works for hiding but not for unhiding.

I think there is some VBA code that will work but I am not a VBA head.

Val

 

[Gord Dibben]

All hidden sheets?

Sub unhide_sheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Visible = True
Next ws
End Sub

An array of sheets?

Sub unhide_sheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets(Array _
("Sheet1", "Sheet2", "Sheet3"))
ws.Visible = True
Next ws
End Sub


Gord Dibben MS Excel MVP

 

[Val Steed]

Yes, all worksheets. in a workbook.

Well done.

Val

 

[Gord Dibben]

Good to hear the feedback.

Thanks, Gord

Yes, all worksheets. in a workbook.

Well done.

Val