Come ordinare le schede dei fogli di lavoro per colore in Excel?

Quando si lavora con grandi cartelle di lavoro Excel contenenti più fogli di lavoro, assegnare colori alle schede dei fogli aiuta a categorizzarli e organizzarli visivamente. Tuttavia, Excel non offre un'opzione integrata per ordinare automaticamente le schede dei fogli per colore. In questo articolo, esploreremo due metodi efficaci per ordinare le schede dei fogli per colore in Excel.

Ordina le schede dei fogli per colore con il codice VBA

Ordina le schede dei fogli per colore con Kutools per Excel

Ordina le schede dei fogli per colore con il codice VBA

Utilizzando il seguente codice VBA, puoi ordinare le schede per colore. Procedi come segue:

1. Clicca su "Sviluppatore" > "Visual Basic", si aprirà una nuova finestra "Microsoft Visual Basic for Applications", clicca su "Inserisci" > "Modulo" e inserisci il seguente codice nel Modulo:

VBA: Ordina i fogli per colore.

Sub SortWorkBookByColor()
'UpdatebyExtendoffice
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. Quindi premi "F5" o clicca sul pulsante "Esegui" per eseguire il codice. Tutte le schede dei fogli di lavoro verranno ordinate per colore.

Ordina le schede dei fogli per colore con Kutools per Excel

Con Kutools, puoi riordinare rapidamente le tue schede in base ai loro colori, risparmiando tempo ed eliminando la necessità di ordinamenti manuali o tramite codice VBA. In questa sezione, ti mostreremo come utilizzare Kutools per Excel per ordinare le schede dei fogli per colore facilmente.

Se hai installato Kutools per Excel, puoi ordinare le schede dei fogli con i seguenti passaggi:

1. Clicca su "Kutools Plus" > "Foglio" > "Ordina tutte le tabelle".

2. Nella finestra di dialogo "Ordina tutte le tabelle", clicca sul pulsante "Ordinamento per colore", vedrai il nuovo ordine delle schede nel riquadro "Dopo l'ordinamento".

3. Quindi clicca su "OK" per ordinare le schede.

Questa funzionalità può riorganizzare rapidamente tutti i fogli di lavoro nella cartella di lavoro corrente. Supporta diversi tipi di ordinamento, inclusi "Ordinamento alfabetico", "Ordinamento esatto", "Ordinamento per colore" e "Ordinamento inverso". Inoltre, puoi anche spostare su/giù i fogli di lavoro e resettare l'ordinamento.

Ordinare le schede dei fogli di lavoro per colore in Excel aiuta a migliorare l'organizzazione e rende più facile navigare tra grandi cartelle di lavoro. Sebbene Excel manchi di un'opzione integrata per farlo, questo articolo parla di due metodi utili per te. Scegli il metodo che meglio si adatta alle tue esigenze e sfrutta al massimo la funzionalità del colore delle schede di Excel per ottimizzare il tuo flusso di lavoro! Se sei interessato a esplorare altri suggerimenti e trucchi di Excel, il nostro sito web offre migliaia di tutorial.

Articolo correlato:

Ordina i fogli di lavoro in ordine alfabetico / alfanumerico in Excel