[VBA] Excel - Sheet

Worksheets : Workbook에 속해 있는 모든 Worksheet 참조

Sheets : Chart Sheet를 포함해 Workbook에 속해 있는 모든 Sheet 참조

 

 

1. Sheet 추가

Sheets.Add

- 선택한 Sheet 앞쪽에 새로운 Sheet 추가

 

Sheets.Add before:=Sheets(2)

- 두번째 Sheet 앞쪽에 새로운 Sheet 추가

 

 

2. Sheet 선택

Sheets("Sheet1").Select

- "Sheet1" Sheet 선택

 

ActiveSheet.Previous.Select
ActiveSheet.Next.Select

- 이전/다음 Sheet 선택

 

 

3. Sheet 삭제

Sheets(1).Delete

- 첫번째 Sheet 삭제

 

Application.DisplayAlerts = False
Sheets(1).Delete

- Sheet 삭제할 때 경고창 없이 바로 실행

 

 

4. Sheet 이동/복사

Sheets(2).Move before:=Sheets(1)

- 두번째 Sheet를 첫번째 Sheet 앞쪽으로 이동

 

Sheets(1).Copy before:=Sheets(2)

- 첫번째 Sheet를 복사해서 두번째 Sheet 앞쪽에 추가

 

 

5. Sheet 이름 변경

Sheets(1).Name = "New Name"

 

 

6. Sheet 개수

Debug.Print Sheets.Count

 

 

7. Sheet 이름순 정렬

For i = 1 To Sheets.Count - 1
    For j = i + 1 To Sheets.Count
        If Sheets(i).Name > Sheets(j).Name Then
            Sheets(j).Move Sheets(i)
        End If
    Next
Next

 

 

8. Sheet 유무 판단

Function IsSheetExist(name_) As Boolean
    On Error Resume Next
    IsSheetExist = CBool(Sheets(name_).Name <> "")
End Function

Debug.Print IsSheetExist("Sheet1")

 

 

 

 

 

 

 

 

 

---

Reference

[1] 엑셀장인의 엑셀 매크로 & VBA 마스터링 북, 장기영 (2014), 디지털북스