해킹공주의 일상
[Excel] 시트이름 일괄 변경 본문
반응형
Sub 시트이름변경()
Dim i As Integer
With [a1:a216] 'a216이라 써있는데 맨 아래 셀로함됌
For i = 2 To .Rows.Count
Sheets(i).Name = .Cells(i)
Next
End With
End Sub시트이름 바꿀 친구들만 냅두고, 맨 첫번째 시트에 A2부터 이름을 쭉 나열해주고 돌리면됨.
반응형
'지식 창고 > 개발 및 업무자동화' 카테고리의 다른 글
| [C언어] extern 변수 및 함수 (0) | 2022.10.22 |
|---|---|
| [Excel] 시트 내 셀 값 넣기 (0) | 2022.10.22 |
| [Excel] 시트 마다 적용 VBA (0) | 2022.10.22 |
| [Excel] 엑셀 전체 시트명 가져오기 (0) | 2022.10.22 |
| [Excel] 시트 이름 특정 셀에 입력하기 (0) | 2022.10.22 |
'지식 창고/개발 및 업무자동화' Related Articles
more
Comments