VBA(엑셀 매크로) 시트(sheet) 이름변경 예제, Worksheets() 구조와 예제

엑셀 매크로로 시트를 옮겨 다니며 작업을 해야 할 때가 있다.

Worksheets()에 이용하면 해당 시트의 오브젝트를 취득 할 수 있다.

 

Worksheets()의 구조에 대해 알아보고 이를 활용하여 특정 셀의 이름을 변경하는

예시를 보도록 하겠다.

 

시트의 생성 삭제의 경우 아래의 링크 참고

2021/01/31 - [IT 이모저모/VBA] - VBA(엑셀 매크로) 시트 생성 및 시트 삭제

 

Worksheets()의 구조

 

Worksheets(name)

 

Worksheets의 파라미터인 name에는 시트의 이름 또는 번호가 들어갈수 있다.

숫자 1이 들어간다면, 첫번째 시트를 취득하고

name 자리에 "Sheet3" 가 들어간다면 시트 이름이 Sheets인 오브젝트의 내용을 취득한다.

 

Worksheets()의 예제

Worksheets()를 이용하여 Sheet2의 시트 이름을 test2로 변경

첫번째 시트 이름을 test1로 변경하는 예제이다.

Sub test_chage_sheet_name()

    Dim sheet2 As Worksheet
    Dim sheet1 As Worksheet
    
    'sheet2의 시트 오브젝트 취득
    Set sheet2 = Worksheets("Sheet2")
    'sheet2의 이름 변경
    sheet2.Name = "test2"
    
    'sheet1의 시트 오브젝트 취득
    Set sheet1 = Worksheets(1)
    
    'sheet1의 시트 이름 변경
    sheet1.Name = "test1"

End Sub

Sub실행 전 스크린샷

Sub실행 후 스크린샷