[엑셀] 비주얼 베이직 - 시트 이름 변경

워크시트 이름 바꾸기

새 문서를 만들면 워크시트의 기본 값은 Sheet1 으로 되어 있고, 추가하면 Shhet2..Sheet3.. 으로 생성된다.

워크시트 이름을 변경하는 경우, 대부분 Sheet1 부분을 더블 클릭하거나 마우스 우측버튼 클릭 후 이름 바꾸기를 이용하며, Alt + H 를 눌렀다 떼고 O, R 키를 순서대로 누르는 방법도 가능하다. 
 
비주얼 베이직으로는 아래와 같은 방법으로 가능하다. 
비주얼 베이직 실행, 프로젝트 창 빈 공간에 마우스 우측 버튼 클릭, 삽입 → 모듈 순으로 클릭

비주얼 베이직 새 모듈 만들기

 
모듈 코드를 입력하는 창이 나타나면 아래와 같이 입력, 실행 버튼 클릭. (나타나지 않을 수 있다)
sub change_name()
worksheets("sheet1").name = "시트1"
end sub

모듈 실행 코드

 
매크로 실행 창이 나타나면 실행 클릭.

매크로 실행

 
시트 이름이 정상적으로 변경되었다.

정상적으로 변경되었다.

 
아래와 같이 입력해도 결과는 동일하다.
Sub change_name()
Sheets(1).Name = "시트1"
End Sub
-----------------------------------------------------

설명

-----------------------------------------------------
sub change_name() // change_name 이라는 이름으로 작업 시작
worksheets("sheet1").name = "시트1" // shhet1 이라는 영어 이름을 시트1 이라는 한글 이름으로 변경 
end sub // change_name 작업 끝
-----------------------------------------------------
Sub change_name() // change_name 이라는 이름으로 작업 시작
Sheets(1).Name = "시트1" // 시트중 첫번째 시트 이름을 시트1 이라는 한글 이름으로 변경
End Sub // change_name 작업 끝
-----------------------------------------------------