1. Location:
  2. / Computer learning >> Datamaskin læring >> Kontor-Programvare >> Microsoft excel >> excel Komplekset >>

Hvordan sortere regneark faner av farge i Excel?

Using følgende VBA-kode, kan du sortere fanene etter farge. Gjør følgende:
1. Klikk Developer > Visual Basic, en ny Microsoft Visual Basic for Applications-vinduet vises, klikker du Sett > Modul, og innspill til følgende kode i modulen:
VBA: Sorter ark etter farger
Sub SortWorkBookByColor () 'Updateby20140624Dim xArray1 () Som LongDim xArray2 () Som StringDim n Som IntegerApplication.ScreenUpdating = FalseIf Val (Application. .Version) > = 10 Da For i = 1 Til Application.ActiveWorkbook.Worksheets.Count Hvis Application.ActiveWorkbook.Worksheets (i) .Visible = -1 Så n = n + 1 ReDim Bevar xArray1 (1 til N) ReDim Bevar xArray2 (1 til N) xArray1 (n) = Application.ActiveWorkbook.Worksheets (i) .Tab.Color xArray2 (n) = Application.ActiveWorkbook.Worksheets (i) .name End If Neste For i = 1 til N For j = jeg å n Hvis xArray1 (j) < xArray1 (i) Så temp = xArray2 (i) xArray2 (i) = xArray2 (j) xArray2 (j) = temp temp = xArray1 (i) xArray1 (i) = xArray1 (j) xArray1 (j) = temp End If Neste Neste For i = n Til ett trinn -1 Application.ActiveWorkbook.Worksheets (CSTR (xArray2 (i))) Flytt etter:. = Application.ActiveWorkbook.Worksheets (Application.ActiveWorkbook.Worksheets.Count) NextEnd IfApplication.ScreenUpdating = TrueEnd SUB2 . Klikk deretter på knappen for å utføre koden. Og alle regneark kategoriene er sortert etter farge. Se skjermbilder:

Sorter regneark fanene etter farge med Kutools for Excel
med slags Ark av Kutools for Excel, kan du ikke bare sortere arkfaner etter farge, men også kan raskt sortere ark faner ved Alpha eller Alpha Numeric
Kutools for Excel.
med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 30 dager. Få den nå.
Hvis du har installert Kutools for Excel, kan du sortere regneark faner med følgende:
1. Klikk Enterprise > Regneark Verktøy > Sorter blad, se skjermbilde:
to. I dialogboksen Sorter Sheets klikker Color Sorter-knappen, vil du se den nye faner orden i New ark faner for panelet. Se skjermbilde:
tre. Og klikk deretter på OK for å sortere kategoriene.
Kutools for Excel er liksom Sheets verktøyet kan raskt omorganisere alle regnearkene i den aktive arbeidsboken. Den støtter flere sorteringstyper, inkludert Alpha Sorter, Alpha Numeric Sorter, farge Sort og revers. I tillegg kan du også flytte opp /ned regneark, og nullstille sortering. Klikk for å vite mer om dette verktøyet.