Unhide all sheets at one time


Posted by A.R. on November 20, 2001 7:29 AM

I received an Excel file that has several sheets hidden. Is there a way to unhide all the sheets at one time?



Posted by Juan Pablo on November 20, 2001 7:30 AM

With a rather simple macro

Dim Unhideall()
For each sh in Sheets
sh.Visible = -1
Next sh
End Sub

Juan Pablo