엑셀 시트 숨기기취소 한번에 한꺼번에

Sub Macro1()
 Dim i As Integer
     For i = 1 To Sheets.Count
         Sheets(i).Visible = True
       Next i
End Sub

1. alt + F11 눌러서 VB 실행

2.파일명에 오른쪽 클릭후 삽입, 모듈추가

3. 아래 코드 붙여 넣기

Sub Macro1()
 Dim i As Integer
     For i = 1 To Sheets.Count
         Sheets(i).Visible = True
       Next i
End Sub

4. F5  누르고 , 실행버튼 누름 완료 ^^

5. 숨기기취소 됐으면  아까 추가한 모듈제거  끝...