엑셀 VBA 시트 숨기기, 보이기 매크로

 

 

시트 숨기기(2번째 시트부터 끝까지)

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

시트 보이기(2번째 시트부터 끝까지)

Sub Hidden_All()   Dim i As Integer      For i = 2 To Sheets.Count          Sheets(i).Visible = False      Next  End Sub