_ExcelTips_의 다른 문제는 워크 시트 이름을 기반으로 워크 북의 워크 시트를 정렬 할 수있는 방법을 제공했습니다. 그러나 각 워크 시트의 주어진 셀에있는 값을 기준으로 워크 시트를 정렬하려면 어떻게해야합니까? 예를 들어 동일한 일반 레이아웃을 공유하는 일련의 워크 시트가 있고 각 워크 시트의 H7 셀에있는 값을 기준으로 워크 시트를 정렬하려고 할 수 있습니다.

이를 처리하는 유일한 방법은 매크로를 사용하는 것입니다. 매크로는 통합 문서의 각 워크 시트를 단계별로 실행 한 다음 각 후속 워크 시트의 키 셀을 검사하여 비교 방법을 확인해야합니다. 셀 값이 현재 워크 시트보다 작 으면 더 작은 값이 포함 된 워크 시트를 이동할 수 있습니다.

Sub SortWksByCell()

Dim i As Integer     Dim j As Integer

For i = 1 To Worksheets.Count         For j = i To Worksheets.Count             If UCase(Worksheets(j).Range("H7")) < _               UCase(Worksheets(i).Range("H7")) Then                 Worksheets(j).Move Before:=Worksheets(i)

End If         Next     Next End Sub

워크 시트의 실제 이동을 수행하는 Move 메서드를 사용합니다. 워크 시트의 이름은 중요하지 않으며 각 워크 시트의 H7 셀 값을 기반으로 한 위치 만 지정됩니다.

_ 참고 : _

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

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

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

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

link : / excelribbon-Ordering_Worksheets_Based_on_a_Cell_Value [셀 값을 기준으로 워크 시트 정렬].