Unhide All Hidden Worksheets At Once

If you have a workbook with many hidden worksheets, you cannot unhide all of them at once, UNLESS, you use the below VBA Code..

------------------------------------------------------------------

Option Explicit Sub UnHideAllSheets() 'Unhides All Worksheets Dim Sheet As Worksheet Application.ScreenUpdating = False For Each Sheet In ActiveWorkbook.Worksheets Sheet.Visible = xlSheetVisible Next Sheet Application.ScreenUpdating = True End Sub

------------------------------------------------------------------

By the way, I also know a nice trick for hiding your worksheets to keep it safe from people you don't want to share them with.

Check it out -

#excel2007 #excel2010 #excel2013 #excel #excellessons #excelprogramming #excelshortcuts #exceltips #exceltricks #exceltutorials #macros #microsoftexcel #msexcel #office #vba