통합 문서에 매우 많은 수의 워크 시트가있는 경우 해당 워크 시트의 이름을 검색하여 고유 한 워크 시트에 넣을 수 있습니다. 예를 들어, 목차 나 다른 방식으로 사용할 수 있도록 한곳에서 사용할 수 있습니다. 다음 매크로 GetSheets는 현재 통합 문서의 워크 시트 이름을 빠르게 검색하여 A1 셀에서 시작하는 현재 통합 문서의 첫 번째 열에 넣습니다.

Sub GetSheets()

Dim J As Integer     Dim NumSheets As Integer

NumSheets = Sheets.Count     For J = 1 To NumSheets         Cells(J, 1) = Sheets(J).Name     Next J End Sub

_ 참고 : _

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

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

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

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

link : / excelribbon-Retrieving_Worksheet_Names [워크 시트 이름 검색].