Die tutoriaal wys hoe jy Excel-werkblaaie vinnig in alfabetiese volgorde kan sorteer deur VBA-kode en die Werkboekbestuurder-nutsding te gebruik.

Microsoft Excel bied 'n aantal vinnige en maklike maniere om te rangskik kolomme of rye in alfabetiese volgorde. Maar daar is net een metode om werkblaaie in Excel te herrangskik - sleep hulle na die verlangde posisie op die bladoortjiebalk. Wanneer dit kom by die alfabetisering van oortjies in 'n baie groot werkboek, kan dit 'n lang en foutiewe manier wees. Op soek na 'n tydbesparende alternatief? Daar bestaan ​​net twee: VBA-kode of derdeparty-nutsgoed.

Hoe om oortjies in Excel met VBA te alfabetiseer

Hieronder sal jy drie VBA-kode voorbeelde vind om Excel te sorteer blaaie stygende, dalende en in enige rigting gebaseer op die gebruiker se keuse.

Om te impliseer dat jy 'n bietjie ervaring met VBA het, sal ons slegs die basiese stappe uiteensit om 'n makro by jou werkblad te voeg:

1. In jou Excel-werkboek, druk Alt + F11 om die Visual Basic-redigeerder oop te maak.
2. Reskliek ThisWorkbook in die linkerpaneel en klik dan Voeg in > Module .
3. Plak die VBA-kode in die Kode-venster.
4. Druk F5 om die makro te laat loop.

Vir die gedetailleerde stap-vir-stap instruksies, sien asseblief Hoe om VBA-kode in Excel in te voeg en uit te voer.

Wenk. As jy die makro wil hou vir verdere gebruik, maak seker dat jy jou lêer stoor as 'n Excel-makro-geaktiveerde werkboek (.xlsm).

Alternatiewelik kan jy ons voorbeeld Alphabetize Excel Tabs-werkboek aflaai, inhoud aktiveer indien gevra, en die verlangde makro direk van daar af laat loop. Die werkboek bevat die volgende makro's:

• TabsAscending - sorteer velle alfabeties van A tot Z.
• TabsDescending - rangskik velle in die omgekeerde volgorde, van Z tot A.
• AlphabetizeTabs - sorteer bladoortjies in beide rigtings, stygend of dalend.

Met die voorbeeldwerkboek afgelaai en oopgemaak in jou Excel, maak jou eie werkboek oop waar jy oortjies wil alfabetiseer, druk Alt + F8 , kies die gewenste makro en klik Run .

Sorteer Excel-oortjies alfabeties van A tot Z

Hierdie klein makro rangskik die velle in die huidige werkboek in stygende alfanumeriese volgorde , eers werkkaarte waarvan die name met nommers begin, dan blaaie van A tot Z.

Sub TabsAscending() Vir i = 1 To Application.Sheets.Count For j = 1 To Application.Sheets.Count - 1 As UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then Sheets(j).Beweeg na:=Sheets(j + 1) End If Next Next MsgBox "Die oortjies is van A tot Z gesorteer." End Sub

Rangskik Excel-oortjies van Z tot A

As jy jou velle in dalende alfanumeriese volgorde (Z tot A, dan velle met numeriese name) wil sorteer, gebruik dan die volgende kode:

Sub TabsDescending() Vir i = 1 ToApplication.Sheets.Count For j = 1 To Application.Sheets.Count - 1 As UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then Application.Sheets(j).Move after:=Application.Sheets(j + 1) End If Next Next MsgBox "Die oortjies is van Z na A gesorteer. " End Sub

Alfabetiseer oortjies stygend of dalend

Hierdie makro laat jou gebruikers besluit hoe om werkblaaie in 'n gegewe werkboek te sorteer, alfabeties van A tot Z of in die omgekeerde volgorde.

Sedert die standaard dialoogkassie (MsgBox) in Excel VBA laat slegs toe om uit 'n handvol vooraf gedefinieerde knoppies te kies, ons sal ons eie vorm (UserForm) skep met drie persoonlike knoppies: A tot Z , Z tot A , en Kanselleer .

Hiervoor, maak die Visual Basic Editor oop, klik met die rechtermuisknop op ThisWorkbook en klik Voeg in > Gebruikersvorm . Noem jou vorm SortorderVan , en voeg 4 kontroles daarby: 'n etiket en drie knoppies:

Volgende, druk F7 (of dubbelklik op die vorm ) om die Kode -venster oop te maak en die onderstaande kode daar te plak. Die kode onderskep knoppie-klikke en ken 'n unieke merker aan elke knoppie toe:

Private Sub CommandButton1_Click() Me.Tag = 1 Me.Hide End Sub Private Sub CommandButton2_Click() Me.Tag = 2 Me.Hide End Sub Private Sub CommandButton3_Click () Me.Tag = 0 Me.Hide End Sub

Afhangende van of die gebruiker die A tot Z of Z tot A -knoppie op jou vorm klik, sorteer oortjies instygende alfabetiese volgorde (by verstek gekies) of dalende alfabetiese volgorde; of maak die vorm toe en doen niks in geval van Kanselleer . Dit word gedoen met die volgende VBA-kode, wat jy op die gewone manier invoeg via Voeg in > Module .

Sub AlphabetizeTabs() Dim SortOrder As Integer SortOrder = showUserForm If SortOrder = 0 Verlaat dan Sub For x = 1 Na Application.Sheets.Count For y = 1 Na Application.Sheets.Count - 1 As SortOrder = 1 Then If UCase$(Application.Sheets(y).Name) > UCase$(Application.Sheets(y + 1).Name) Then Sheets(y).Beweeg na:=Sheets(y + 1) End If ElseIf SortOrder = 2 Then If UCase$(Application.Sheets(y).Name) < UCase$(Application.Sheets(y + 1).Name) Then Sheets(y).Beweeg na:=Sheets(y + 1) End If End If Next End Subfunksie showUserForm() As Heelgetal showUserForm = 0 Laai SortOrderForm SortOrderForm .Wys (1) showUserForm = SortOrderForm.Tag Los SortOrderForm Eindfunksie

As jy nog nie baie gemaklik is met VBA nie, kan jy eenvoudig ons voorbeeldwerkboek aflaai om oortjies te alfabetiseer, dit in jou Excel oop te maak langs jou eie lêer waar jy wil om oortjies te sorteer, en hardloop die AlphabetizeTabs makro uit jou werkboek:

Kies die voorkeursorteervolgorde, sê, A tot Z , en let op die resultate:

Wenk. Met VBA kan jy ook kopieë van jou Excel-werkblaaie skep. Die kode is hier beskikbaar: Hoe omduplikaatblad in Excel met VBA.

Hoe om Excel-oortjies alfabeties te sorteer met Ultimate Suite

Die gebruikers van ons Ultimate Suite vir Excel hoef nie met VBA rond te vroetel nie – hulle het 'n multi -funksionele Werkboekbestuurder tot hul beskikking:

Met hierdie hulpmiddel by jou Excel-lint gevoeg word, word oortjies alfabeties met 'n enkele knoppie-klik gedoen, presies soos dit moet wees!

As jy nuuskierig is om hierdie en 70+ meer professionele nutsmiddels vir Excel te verken, is 'n proefweergawe van ons Ultimate Suite hier beskikbaar om af te laai.

Dankie jy vir die lees en hoop om jou volgende week op ons blog te sien!