Unhiding

M

mark1

Is there a way to unhide multiple worksheets all at once
instead of each individually? Thanks!!
 
L

LB79 - ExcelForums.com

You could try a macro to hide/unhide sheets

Sub Unhide(
Application.ScreenUpdating = Fals
Sheets("Sheet2").Visible = Tru
Sheets("Sheet3").Visible = Tru
Sheets("Sheet4").Visible = Tru
Sheets("Sheet5").Visible = Tru
End Su

Sub Hide(
Application.ScreenUpdating = Fals
Sheets("Sheet2").Visible = Fals
Sheets("Sheet3").Visible = Fals
Sheets("Sheet4").Visible = Fals
Sheets("Sheet5").Visible = Fals
End Su
 
D

David McRitchie

Hi Mark, (Hiding and Unhiding Worksheets)
You can Group the sheets first, by adding additional sheets
while holding the Ctrl key. Then hide your sheets as you
did before Format, Sheet, Hide/unhide.

When you group sheets any change you make to one sheet
will be made to the other sheets in the group. So make sure
you either hide your sheets immediately which will ungroup
them. The normal way to ungroup is to right click on any
worksheet tab and choose ungroup.

Now if you want to unhide them all once, that would require a
macro. Instructions to install and use a macro are in
http://www.mvps.org/dmcritchie/excel/excel.htm

Sub UnHideAllSheets()
Dim cell as range For Each cell In Sheets
cell.Visible = True
Next cell
End Sub

If you want something more elaborate using a form and creating an addin,
see the following. There are also very well hidden sheets which you can
look up in VBE help.

ABC ~ All 'Bout Computers, Vol. 37: Unhide Multiple Worksheets in Excel
"Unhiding Multiple Worksheets in Excel", Ray Blake
http://personal-computer-tutor.com/abc4/v37/ray37.htm

You might also take a look at John Walkenbach's
Excel User Tip: Making a worksheet very hidden
http://www.j-walk.com/ss/excel/usertips/tip036.htm
when a sheet is very hidden it can only be unhidden through code.

Please try to use a more descriptive subject title next time you
post a new thread, and your including your first and last name would be nicer
 
Top