탭을 두 번 클릭하고 새 이름을 제공하여 워크 시트 탭의 이름을 변경할 수 있다는 것을 이미 알고있을 것입니다. 그러나 동적으로 수행하려면 어떻게해야합니까? A1 셀의 값이 탭 이름으로 자동 표시되도록하려면 어떻게해야합니까?

불행히도 Excel은 이러한 종류의 작업을 처리 할 수있는 내장 함수를 제공하지 않습니다. 사용자를 위해 작업을 수행 할 매크로를 사용하여 이러한 기능을 개발하는 것은 비교적 간단한 작업입니다. 예를 들어, 다음 매크로는 탭 이름을 A1의 내용으로 변경합니다.

Sub myTabName()

ActiveSheet.Name = ActiveSheet.Range("A1")

End Sub

이 매크로에 대해주의해야 할 몇 가지 중요한 항목이 있습니다. 우선, 오류 검사가 없습니다. 즉, A1에 탭 이름에 대해 잘못된 값이 포함 된 경우 (예 : 전혀 없거나 31 자 이상) 매크로가 오류를 생성합니다. 둘째, 매크로를 수동으로 실행해야합니다.

오류를 확인하고 자동으로 실행되는보다 강력한 매크로를 원한다면 어떻게합니까? 결과는 조금 더 길지만 여전히 지나치게 복잡하지는 않습니다.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

Set Target = Range("A1")

If Target = "" Then Exit Sub     On Error GoTo Badname     ActiveSheet.Name = Left(Target, 31)

Exit Sub Badname:

MsgBox "Please revise the entry in A1." & Chr(13) _     & "It appears to contain one or more " & Chr(13) _     & "illegal characters." & Chr(13)

Range("A1").Activate End Sub

이 매크로를 설정하려면 다음 단계를 따르십시오.

  1. 워크 시트가 하나만있는 새 통합 문서를 엽니 다.

  2. 워크 시트 탭을 마우스 오른쪽 단추로 클릭하고 나타나는 컨텍스트 메뉴에서 코드보기를 선택합니다. Excel에 VBA 편집기가 표시됩니다.

  3. 위의 매크로를 코드 창에 붙여 넣거나 입력합니다.

  4. VBA 편집기를 닫습니다.

  5. 시스템에서 XLStart 폴더를 찾습니다. (Windows 검색 기능을 사용하여 폴더를 찾으십시오.)

  6. XLStart 디렉터리에 BOOK.XLT라는 이름을 사용하여 통합 문서를 Excel 템플릿으로 저장합니다. 이렇게하면 템플릿이 새로 만드는 통합 문서의 패턴이됩니다.

  7. 이번에는 SHEET.XLT라는 이름을 사용하여 통합 문서를 동일한 디렉터리에 템플릿으로 다시 저장합니다. 이렇게하면 템플릿이 통합 문서에 삽입하는 새 워크 시트의 패턴이됩니다.

  8. Excel을 닫고 다시 시작하십시오.

이제 A1 셀의 값을 변경할 때마다 워크 시트 탭도 업데이트됩니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (2145)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Dynamic_Worksheet_Tab_Names [Dynamic Worksheet Tab Names].