Sheet1 Excel 시트 이름 리스트 만들기 - VBA Sub 단추1_Click() Dim SheetList As Worksheet Dim i As Integer, cntsheet As Integer Set SheetList = Sheets("Index") '리스트를 만들어줄 시트 명 With SheetList cntsheet = Worksheets.Count '.Columns("H:H").EntireColumn.ClearContents 'A~Z 컬럼까지 지우기 For i = 2 To cntsheet '하이퍼 링크 없이 '.Cells(i + 1, 1) = i 'Cells(행,열) '.Cells(i + 1, 2) = Sheets(i).Name '하이퍼 링크 포함 SheetList.Hyperlinks.Add _ Anchor:=SheetList.Cells(i + .. 2022. 11. 16. 이전 1 다음
