[엑셀] 숨긴 시트 한번에 열기

엑셀 숨겨져 있는 시트를 한번에 여는 코드입니다.

1. 엑셀에서 Alt + F11 을 누릅니다.

2. 그림과 같이 Visual Basic이 나오면 현재통합문서에 아래 코드를 복사&붙여넣기를 한후 F5 또는 실행 버튼 클릭.  끝

 

Option Explicit
Sub All_Sheets_Visible()

    Dim Sht As Worksheet
   
        Application.ScreenUpdating = False
        For Each Sht In ActiveWorkbook.Sheets
            Sht.Visible = True
        Next Sht

End Sub