Unhide Multiple sheets together in Excel

sheet
excel

#1

Hi,

In Excel, i can hide or delete multiple sheets after selecting them but I am not able to unhide those hidden sheets together. It can be done one after another. Can you suggest me the methods to unhide sheets in one step?

thanks,
Mukesh


#2

@Mukesh

You can use below macro code to unhide all sheets together.

Sub UnhideAllSheets()
    Dim wsSheet As Worksheet

    For Each wsSheet In ActiveWorkbook.Worksheets
        wsSheet.Visible = xlSheetVisible
    Next wsSheet
End Sub

Regards,
Sunil