Note: The other languages of the website are Google-translated. Back to English

Jak třídit listy v abecedním / alfanumerickém pořadí v aplikaci Excel?

Normálně můžete řadit nebo uspořádat pořadí karet listů v aplikaci Excel přetažením karet listů na panelu karet listu. Chcete-li to však provést s více listy, můžete zvážit následující složité způsoby, jak rychle seřadit listy v abecedním / alfanumerickém pořadí ve velkém sešitu.

Seřaďte pracovní listy v abecedním / alfanumerickém pořadí podle kódu VBA
Řazení pracovních listů v abecedním / alfanumerickém pořadí pomocí programu Kutools pro Excel


Seřaďte pracovní listy v abecedním / alfanumerickém pořadí podle kódu VBA

V centru podpory společnosti Microsoft je makro pro třídění listů podle alfa. Můžeme jej použít pomocí následujících kroků:

1.  Podržte stisknuté tlačítko ALT + F11 klíče a otevře se Microsoft Visual Basic pro aplikace okno.

2.  klikněte Vložit > Modula poté vložte následující makro do souboru Okno modulu.

VBA: Řazení listů v abecedním / alfanumerickém pořadí

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. zmáčkni F5 klíč ke spuštění tohoto makra. V následujícím řádku klepněte na Ano, budou všechny listy seřazeny podle vzestupného abecedního pořadí; a klikněte Ne, budou všechny listy seřazeny v sestupném abecedním pořadí.


Řazení pracovních listů v abecedním / alfanumerickém pořadí pomocí programu Kutools pro Excel

Pokud nejste obeznámeni s makry nebo dáváte přednost jiným způsobem, můžete to zkusit Kutools pro Excel. Kutools pro Excel's Třídit listy nástroj může snadno třídit všechny listy.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1, klikněte Kutools Plus > Pracovní list > Třídit listy. Viz snímek obrazovky:

2. V Třídit listy V dialogovém okně vyberte v pravém podokně jeden typ řazení, který potřebujete, například Alfa řazení, Alfa číselné řazení, a potom klepněte na tlačítko OK knoflík. Viz screenshot:

Poté se všechny listy seřadí podle zadaného typu řazení. Viz screenshot:

6. třídit listy

Kutools pro Excel's Třídit listy nástroj může rychle přeskupit všechny listy v aktivním sešitu. Podporuje několik typů řazení, včetně Alfa řazení, Alfa číselné řazení, Barevné třídění a Zvrátit. Kromě toho můžete také přesouvat pracovní listy nahoru / dolů a resetovat řazení.

  Pokud chcete mít bezplatnou zkušební verzi (30-den) této utility, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.


Ukázka: Seřaďte všechny listy v abecedním / alfanumerickém pořadí


Související článek:

Řazení karet listu podle barvy


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
officetab dno

Komentáře (81)
Hodnocení 5 z 5 · 2 hodnocení:
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo perfektně. Děkuji za pomoc a ušetříte mi spoustu času!
Tento komentář byl moderátorem webu minimalizován
AHOJ, NEMŮŽU ULOŽIT SEŘAZENÝ SOUBOR. VYZÝVÁ SE K POVOLENÍ ULOŽENÍ MAKRA... POMOC S TÍM?
Tento komentář byl moderátorem webu minimalizován
Dík! Fungovalo jako kouzlo! Velmi oceňuji informace!
Tento komentář byl moderátorem webu minimalizován
ÚŽASNÝ! Děkuji mnohokrát!
Tento komentář byl moderátorem webu minimalizován
ÚŽASNÝ! Děkuji mnohokrát
Makro fungovalo perfektně. Děkuji za pomoc a ušetříte mi spoustu času! :D
Tento komentář byl moderátorem webu minimalizován
fungovalo to jako kouzlo, díky za pomoc!!
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo skvěle!!! Děkuji moc za info! Můj šéf byl ohromen, že jsem listy opravil v alfa pořadí tak rychle! :lol:
Tento komentář byl moderátorem webu minimalizován
První makro miminka a fungovalo perfektně. Dík!
Tento komentář byl moderátorem webu minimalizován
Návod a makro fungovaly skvěle! Proč není tato část MS Excel ve výchozím nastavení?
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo skvěle!!! Ocenil jsem veškerou vaši pomoc... Je dobrá věc učit lidi, kteří se opravdu rádi učí... Mějte se skvěle...
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo skvěle! Dík. :lol:
Tento komentář byl moderátorem webu minimalizován
Skvělé :-) Děkuji moc VB pracoval skvěle.... Oceňujeme... Ragal
Tento komentář byl moderátorem webu minimalizován
Ušetřil mi hodiny! Děkuji!
Tento komentář byl moderátorem webu minimalizován
Funguje výborně. Díky čaroději!
Tento komentář byl moderátorem webu minimalizován
úžasné, moc mi pomozte prosím napište mi tyto druhy věcí, abych je mohl také použít v budoucnu, děkuji
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo perfektně a v tomto sešitu mám 75 listů!
Tento komentář byl moderátorem webu minimalizován
Makro fungovalo perfektně! a ve své zprávě mám 75 listů!
Tento komentář byl moderátorem webu minimalizován
VÝBORNÉ MAKRO! POZDRAV
Tento komentář byl moderátorem webu minimalizován
Brilantní . Děkujeme za sdílení
Tento komentář byl moderátorem webu minimalizován
Zobrazuje se mi chyba Snímek obrazovky 2014-05-19 v 5.43.19 Snímek obrazovky 2014-05-19 v 5.43.19:XNUMX:XNUMX
Tento komentář byl moderátorem webu minimalizován
Makro funguje perfektně :lol: bez problémů. Děkuji mnohokrát za informace. TAKOVÝ zachránce života!!
Zatím zde nejsou žádné komentáře
Načíst další
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL