본문 바로가기
만드는 이야기/VBA

vba)현재 통합문서의 모든시트의 표서식으로 만든 모든표 범위로 변환

by LillyLt 2014. 3. 7.

Sub sub모든표_언리스트()


   '시트형으로 변수 생성

   Dim St As Worksheet

   

   '리스트오브젝트형으로 변수 생성

   '표 서식으로 만든 표를 말함.

   Dim Lt As ListObject

   

   '각 시트마다

   For Each St In Worksheets

      'St.Activate   '해당시트 활성화

      '각 표마다

      For Each Lt In St.ListObjects

        'Lt.Range.Activate '해당표 활성화

        '표 형식을 헤제

        Lt.Unlist

      Next

      

   Next

   

End Sub