Sådan sorteres regneark faner i alfabetisk rækkefølge i Excel
Hvis du har et stort antal regneark i din Excel-projektmappe, kan det være svært at finde et specifikt regneark. Sortering af dit regnearks faner alfabetisk ville gøre det nemmere at finde det, du leder efter.
Udover at organisere dit regnearks faner ved at anvende farver på dem, kan du også sortere dem alfabetisk eller alfanumerisk, så længe du har anvendt tilpassede navne til dine regneark. Desværre er sortering af regnearkfaner alfabetisk ikke indbygget i Excel, men du kan tilføje en makro til din projektmappe, der giver dig mulighed for at sortere dine faner i stigende eller faldende rækkefølge. Vi viser dig, hvordan du tilføjer en makro, der er tilgængelig på Microsofts supportwebsted, til din Excel-projektmappe, der sorterer dine regnearkfaner.
For at starte, tryk på Alt + F11 for at åbne Microsoft Visual Basic for Applications (VBA) editoren. Gå derefter til Indsæt> Modul.
Kopier og indsæt den følgende makro fra Microsoft i modulvinduet, der vises.
Sub Sort_Active_Book () Dim i som helhed Dim j Som helhed Dim iAnswer som VbMsgBoxResult "Spørg brugeren som hvilken retning de ønsker at 'sortere regnearkene.' IAnswer = MsgBox (" Sorter ark i stigende ordre? "& Chr (10) _ & "Klikker på Nej vil sortere i synkende rækkefølge", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Sorter regneark") For i = 1 til Sheets.Count For j = 1 til Sheets.Count - 1 "Hvis svaret er Ja, skal du sortere i stigende rækkefølge. 'Hvis iAnswer = vbYes Så hvis UCase $ (Ark (j) .Name)> UCase $ (Ark (j + 1) .Name) Så Ark (j) .Flere Efter: = Ark (j + 1) Afslut Hvis "Hvis svaret er Nej, så sortere i faldende rækkefølge. 'ElseIf iAnswer = vbNo Så hvis UCase $ (Sheets (j) .Name) < UCase$(Sheets(j + 1).Name) Then Sheets(j).Move After:=Sheets(j + 1) End If End If Next j Next i End Sub VBA-editoren navngiver automatisk hvert modul med et nummer på enden, som Module1, Module2 osv. Du kan simpelthen acceptere standardnavnet på modulet. Men hvis du planlægger at tilføje andre makroer til din projektmappe, er det en god ide at omdøbe hvert modul, så du ved, hvad de er. Vi omdøber vores modul for at vise dig hvordan.
For at omdøbe modulet skal du vælge teksten i feltet Navn for modulet under Egenskaber i venstre rude.
Indtast et navn på modulet i feltet Navn og tryk på Enter. Bemærk, at modulnavnet ikke kan indeholde mellemrum.
Modulets navn ændres i listen Moduler under Projekt i venstre rude.
Luk VBA-editoren ved at gå til Filer> Luk og vend tilbage til Microsoft Excel.
Nu skal vi køre makroen for at sortere vores faner. Tryk på Alt + F8 for at få adgang til listen over makroer i dialogboksen Makro. Vælg makroen i listen (i vores tilfælde er der kun en makro), og klik på "Kør".
Den følgende dialogboks viser, så du kan vælge, om du vil sortere dine regneark i stigende eller faldende rækkefølge. Vi vil sortere dem i stigende rækkefølge, så vi klikker på "Ja".
Arbejdsarkfanerne er nu indrettet i alfabetisk rækkefølge.
Den makro, du har tilføjet, er en del af din projektmappe nu, men når du gemmer det, vil du sandsynligvis se følgende dialogboks. Det skyldes, at du har gemt din projektmappe som en .xlsx-fil, som er et normalt Excel-arbejdsbogsformat, der ikke indeholder makroer. Hvis du vil inkludere makroer i din projektmappe og kunne køre dem, skal du gemme din projektmappe som en makroaktiveret arbejdsbog eller en .xlsm-fil. For at gøre dette skal du klikke på "Nej" i denne dialogboks.
Dialogboksen Gem som vises. Naviger til, hvor du vil gemme den makroaktiverede arbejdsbog, hvis du ikke allerede er i den pågældende mappe. Vælg "Excel Macro-Enabled Workbook (* .xlsm)" fra rullelisten "Gem som type".
Klik på "Gem".
Hvis du ikke gemmer projektmappen som en makroaktiveret arbejdsbog (.xlsm-fil), vil den makro, du tilføjede, blive slettet. Du vil måske slette .xlsx-versionen af din projektmappe, så du ikke glemmer at bruge .xlsm-versionen af din projektmappe, hvis du vil tilføje flere regnearkfaner og sortere dem igen ved hjælp af makroen. Du kan altid gemme projektmappen som en .xlsx-fil igen, hvis du ikke længere vil bruge makroer.
