본문 바로가기
WeekdayLife/excel

[엑셀VBA] 숨겨진 시트 전부 한방에 꺼내기

by JO_i 2019. 8. 22.




엑셀VBA로 숨겨진 시트 전부 한방에 꺼내기

내가 숨겼든 남이 숨겼든, 숨겨져 있는 시트를 숨기기 취소로 일일이 꺼내기는 참으로 귀찮은 일이다.

적어도 2013까지는 일괄 숨기기 취소나, 여러개를 선택해서 취소하는 기능이 없는 것 같아, VBA코드로 간단하게 짜본다.

 

 

 

[코드샘플]

Sub showHiddenSheet()
'감춘시트전체활성화
wsCount = Worksheets.Count
For sheetCount = 1 To wsCount
    Worksheets(sheetCount).Visible = True
Next sheetCount Worksheets(1).Activate
End Sub