Notice
Recent Posts
Recent Comments
«   2025/05   »
1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31
05-03 04:07
Today
Total
관리 메뉴

해킹공주의 일상

[Excel] 엑셀 전체 시트명 가져오기 본문

지식 창고/개발 및 업무자동화

[Excel] 엑셀 전체 시트명 가져오기

7.3.7 2022. 10. 22. 01:36
반응형
Sub 시트명가져오기_Click()



Dim sht As Worksheet

Dim i As Integer



'전체 시트를 하나를 읽는다.

For Each sht In Worksheets

'선택한 셀 기준으로 행을 증가하면서

ActiveCell.Offset(i, 0) = sht.Name



'다른방법 : 행/열 설정시 반드시 1이상의 값을 지정해야 한다.
반응형
Comments