엑셀팁 - 특정 셀의 입력값에 따라 시트이름 자동 변환

앞선 글 "엑셀팁 - 특정 셀의 클릭시 새로운 시트 생성 & 이름 자동"과는

달리 이번 글은 이미 생성되어 있는 시트의 이름을 특정셀의 값으로 가져오는 것이다.

 

예를들면 홍길동의 자료가 담긴 시트가 있다면, A5셀에  '홍길동'입력하면 그 시트 이름이 '홍길동'으로 자동변환하게 된다.

엑셀에서 '홍길동' 시트 복사하면 시트 이름이 '홍길동 (2)'이 된다.

여기서 A5셀에 '이순신'을 입력하면 시트 이름이 '이순신'으로 자동변환된다.

 

---

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Name = ActiveSheet.Range("A5").Value
End Sub

---

특정 셀의 입력값에 따라 시트이름 자동변환.txt

0.00MB