Hogyan válogassunk munkalapokat ábécé / alfanumerikus sorrendbe az Excelben?
Általában a munkalapok sorrendjét rendezheti vagy elrendezheti az Excelben úgy, hogy a lapfüleket a lapfülsorra húzza. De ha ezt több munkalap segítségével szeretné elvégezni, fontolja meg a következő trükkös módszereket a munkalapok gyors betűrendben / alfanumerikus sorrendbe rendezésére egy nagy munkafüzetben.
A munkalapok rendezése ábécé / alfanumerikus sorrendbe, VBA kóddal
Rendezd a munkalapokat ábécé / alfanumerikus sorrendben a Kutools for Excel segítségével
A munkalapok rendezése ábécé / alfanumerikus sorrendbe, VBA kóddal
Van egy makró a munkalapok alfa szerinti rendezéséhez a Microsoft támogatási központjában. A következő lépésekkel alkalmazhatjuk:
1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.
2. Kattints betétlap > Modulok, majd illessze be a következő makrót a Modul ablak.
VBA: A lapok rendezése ábécé / alfanumerikus sorrendbe
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. megnyomni a F5 gomb a makró futtatásához. A következő prompt mezőben kattintson a gombra Igen, az összes munkalap rendezése növekvő ábécé sorrendben történik; és kattintson Nem, az összes munkalap ábécé szerinti sorrendben lesz rendezve.
Rendezd a munkalapokat ábécé / alfanumerikus sorrendben a Kutools for Excel segítségével
Ha nem ismeri a makrókat, vagy más módszereket kedvel, akkor megpróbálhatja Kutools az Excel számára. Kutools az Excel számára's Levélek rendezése eszköz könnyen rendezheti az összes munkalapot.
Alkalmazás előtt Kutools az Excel számáraKérjük, először töltse le és telepítse.
1. Kattints Kutools Plus > Munkalap > Levélek rendezése. Lásd a képernyőképet:
2. Az Levélek rendezése párbeszédpanelen válasszon ki egy megfelelő rendezési típust a jobb oldali ablaktáblán, például Alfa rendezés, Alfa numerikus rendezés, majd kattintson a OK gomb. Lásd a képernyőképet:
Ezután az összes munkalap rendezése a megadott rendezési típus alapján történik. Lásd a képernyőképet:
Kutools az Excel számára's Levélek rendezése eszköz gyorsan átrendezheti az aktív munkafüzet összes munkalapját. Több rendezési típust támogat, beleértve a Alfa rendezés, Alfa numerikus rendezés, Szín rendezés és a Fordított. Ezen felül mozgathatja a munkalapokat fel / le és visszaállíthatja a rendezést.
Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.
Bemutató: Az összes munkalap rendezése ábécé / alfanumerikus sorrendbe
Kapcsolódó cikk:
A munkalapok lapjait szín szerint rendezheti
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!