메인 컨텐츠로 가기

Excel에서 색상별로 워크 시트 탭을 정렬하는 방법은 무엇입니까?

예를 들어 워크 시트가 너무 많은 통합 문서를 쉽게 처리하고 관리하기 위해 해당 워크 시트 탭에 탭 색상을 추가 한 다음 Excel에서 시트 탭을 색상별로 쉽게 정렬하고 식별 할 수 있습니다. 이 기사에서는 Excel에서 다음과 같이 시트 탭을 색상별로 얼마나 빨리 정렬 할 수 있는지 보여줍니다.

문서 정렬 탭별 색상1

VBA 코드를 사용하여 색상별로 워크 시트 탭 정렬

Excel 용 Kutools를 사용하여 색상별로 워크 시트 탭 정렬

화살표 블루 오른쪽 거품 VBA 코드를 사용하여 색상별로 워크 시트 탭 정렬

다음 VBA 코드를 사용하여 색상별로 탭을 정렬 할 수 있습니다. 다음과 같이하십시오 :

1. 클릭 개발자 > Visual Basic을새를 애플리케이션 용 Microsoft Visual Basic 창이 표시되면 끼워 넣다 > 모듈을 클릭하고 모듈에 다음 코드를 입력합니다.

VBA : 색상별로 시트를 정렬합니다.

Sub SortWorkBookByColor()
'Updateby20140624
Dim xArray1() As Long
Dim xArray2() As String
Dim n As Integer
Application.ScreenUpdating = False
If Val(Application.Version) >= 10 Then
    For i = 1 To Application.ActiveWorkbook.Worksheets.Count
        If Application.ActiveWorkbook.Worksheets(i).Visible = -1 Then
            n = n + 1
            ReDim Preserve xArray1(1 To n)
            ReDim Preserve xArray2(1 To n)
            xArray1(n) = Application.ActiveWorkbook.Worksheets(i).Tab.Color
            xArray2(n) = Application.ActiveWorkbook.Worksheets(i).Name
        End If
    Next
    For i = 1 To n
        For j = i To n
            If xArray1(j) < xArray1(i) Then
                temp = xArray2(i)
                xArray2(i) = xArray2(j)
                xArray2(j) = temp
                temp = xArray1(i)
                xArray1(i) = xArray1(j)
                xArray1(j) = temp
            End If
        Next
    Next
    For i = n To 1 Step -1
        Application.ActiveWorkbook.Worksheets(CStr(xArray2(i))).Move after:=Application.ActiveWorkbook.Worksheets(Application.ActiveWorkbook.Worksheets.Count)
    Next
End If
Application.ScreenUpdating = True
End Sub

2. 그런 다음  문서 곱하기 계산 3 버튼을 눌러 코드를 실행합니다. 그리고 모든 워크 시트 탭은 색상별로 정렬되었습니다. 스크린 샷보기 :

문서 정렬 탭별 색상2
-1
문서 정렬 탭별 색상3

화살표 블루 오른쪽 거품 Excel 용 Kutools를 사용하여 색상별로 워크 시트 탭 정렬

와 더불어 시트 정렬 of Excel 용 Kutools, 색상별로 시트 탭을 정렬 할 수있을뿐만 아니라 알파벳 또는 영숫자별로 시트 탭을 빠르게 정렬 할 수도 있습니다.

Excel 용 Kutools : 300 개 이상의 편리한 Excel 추가 기능으로 30 일 동안 제한없이 무료로 사용해 볼 수 있습니다. 지금 사세요.

Excel 용 Kutools를 설치 한 경우 다음 단계에 따라 워크 시트 탭을 정렬 할 수 있습니다.

1. 클릭 Enterprise > 워크 시트 도구 > 시트 정렬, 스크린 샷 참조 :

문서 정렬 탭별 색상4

2. 에서 시트 정렬 대화 상자에서 색상 정렬 버튼을 클릭하면 새 시트 탭 순서 창에서 새 탭 순서를 볼 수 있습니다. 스크린 샷보기 :

문서 정렬 탭별 색상5

3. 그런 다음 OK 탭을 정렬합니다.

Excel 용 Kutools's 시트 정렬 도구는 활성 통합 문서의 모든 워크 시트를 빠르게 재정렬 할 수 있습니다. 다음을 포함한 여러 정렬 유형을 지원합니다. 알파 정렬, 영숫자 정렬, 색상 정렬 과 개머리판. 또한 위 / 아래로 이동 워크 시트 및 정렬 재설정. 이 유틸리티에 대한 자세한 내용을 보려면 클릭하십시오..

관련 기사 :

Excel에서 알파벳 / 영숫자 순서로 워크 시트 정렬

최고의 사무 생산성 도구

🤖 Kutools AI 보좌관: 다음을 기반으로 데이터 분석을 혁신합니다. 지능형 실행   |  코드 생성  |  사용자 정의 수식 만들기  |  데이터 분석 및 차트 생성  |  Kutools 기능 호출...
인기 기능: 중복 항목 찾기, 강조 표시 또는 식별   |  빈 행 삭제   |  데이터 손실 없이 열이나 셀 결합   |   수식없이 반올림 ...
슈퍼 조회: 다중 기준 VLookup  |   다중 값 VLookup  |   여러 시트에 걸친 VLookup   |   퍼지 조회 ....
고급 드롭다운 목록: 드롭다운 목록을 빠르게 생성   |  종속 드롭다운 목록   |  다중 선택 드롭 다운 목록 ....
열 관리자: 특정 개수의 열 추가  |  열 이동  |  Toggle 숨겨진 열의 가시성 상태  |  범위 및 열 비교 ...
특색 지어진 특징: 그리드 포커스   |  디자인보기   |   큰 수식 바   |  통합 문서 및 시트 관리자   |  리소스 라이브러리 (자동 텍스트)   |  날짜 선택기   |  워크 시트 결합   |  셀 암호화/해독   |  목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터 (굵게/기울임꼴/취소선 필터링...) ...
상위 15개 도구 세트:  12 본문 도구 (텍스트 추가, 문자 제거,...)   |   50+ 거래차트 유형 (Gantt 차트,...)   |   40+ 실용 방식 (생일을 기준으로 나이 계산,...)   |   19 삽입 도구 (QR 코드 삽입, 경로에서 그림 삽입,...)   |   12 매출 상승 도구 (숫자를 단어로, 환율,...)   |   7 병합 및 분할 도구 (고급 결합 행, 셀 분할,...)   |   ... 그리고 더

Excel용 Kutools로 Excel 기술을 강화하고 이전과는 전혀 다른 효율성을 경험해 보세요. Excel용 Kutools는 생산성을 높이고 시간을 절약하기 위해 300개 이상의 고급 기능을 제공합니다.  가장 필요한 기능을 얻으려면 여기를 클릭하십시오...

상품 설명

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations