Unhide Function in MS Excel 97

Posted by Evergreen on September 19, 2001 9:08 AM

Does anyone know how to unhide multiples sheets in the same workbook at once?

Posted by Barrie Davidson on September 19, 2001 12:06 PM

You'll have to do this via VBA (a macro). Try this

Sub Unhide_all_sheets()
Dim c, counter As Integer
c = ActiveWorkbook.Sheets.Count
For counter = 1 To c
Sheets(counter).Visible = True
Next counter
End Sub

Regards,
BarrieBarrie Davidson

Posted by Evergreen on September 20, 2001 6:36 AM

It works.

Thanks, Barrie