Hoe werkbladen in alfabetische / alfanumerieke volgorde in Excel te sorteren?
Normaal gesproken kunt u de volgorde van werkbladtabs in Excel sorteren of rangschikken door de bladtabs op de werkbladtabbalk te slepen en neer te zetten. Maar om dit voor elkaar te krijgen met meerdere werkbladen, kunt u de volgende lastige manieren overwegen om werkbladen snel in alfabetische / alfanumerieke volgorde in een grote werkmap te sorteren.
Sorteer werkbladen in alfabetische / alfanumerieke volgorde met VBA-code
Sorteer werkbladen in alfabetische / alfanumerieke volgorde met Kutools voor Excel
Sorteer werkbladen in alfabetische / alfanumerieke volgorde met VBA-code
Er is een macro voor het sorteren van werkbladen op alfa, gepost in het Microsoft Support Center. We kunnen het toepassen met de volgende stappen:
1. Houd de toets ingedrukt ALT + F11 toetsen, en het opent de Microsoft Visual Basic voor toepassingen venster.
2. Klik Invoegen > Moduleen plak de volgende macro in het Module Venster.
VBA: Sorteer bladen in alfabetische / alfanumerieke volgorde
Sub SortWorkBook()
'Updateby20140624
Dim xResult As VbMsgBoxResult
xTitleId = "KutoolsforExcel"
xResult = MsgBox("Sort Sheets in Ascending Order?" & Chr(10) & "Clicking No will sort in Descending Order", vbYesNoCancel + vbQuestion + vbDefaultButton1, xTitleId)
For i = 1 To Application.Sheets.Count
For j = 1 To Application.Sheets.Count - 1
If xResult = vbYes Then
If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then
Sheets(j).Move after:=Sheets(j + 1)
End If
ElseIf xResult = vbNo Then
If UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then
Application.Sheets(j).Move after:=Application.Sheets(j + 1)
End If
End If
Next
Next
End Sub
3. druk de F5 toets om deze macro uit te voeren. Klik in het volgende promptvenster op Ja, alle werkbladen worden in oplopende alfabetische volgorde gesorteerd; en klik Neeworden alle werkbladen gesorteerd in aflopende alfabetische volgorde.
Sorteer werkbladen in alfabetische / alfanumerieke volgorde met Kutools voor Excel
Als u niet bekend bent met macro's of de voorkeur geeft aan andere manieren, kunt u het proberen Kutools for Excel. Kutools for Excel's Sorteer bladen tool kan alle werkbladen gemakkelijk sorteren.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. Klikken Koetools Plus > Werkblad > Sorteer bladen. Zie screenshot:
2. In de Sorteer bladen dialoogvenster, selecteert u een sorteringstype dat u nodig hebt in het rechterdeelvenster, zoals Alpha Sorteren, Alfanumeriek sorterenen klik vervolgens op de OK knop. Zie screenshot:
Vervolgens worden alle werkbladen gesorteerd op basis van het opgegeven sorteertype. Zie screenshot:
Kutools for Excel's Sorteer bladen tool kan snel alle werkbladen in de actieve werkmap herschikken. Het ondersteunt verschillende sorteringstypen, waaronder Alpha Sorteren, Alfanumeriek sorteren, Kleur sorteren en Omkeren. Bovendien kunt u ook werkbladen omhoog / omlaag verplaatsen en de sortering opnieuw instellen.
Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.
Demo: Sorteer alle werkbladen in alfabetische / alfanumerieke volgorde
Gerelateerd artikel:
Sorteer werkbladtabbladen op kleur
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!