Pam by chcela usporiadať karty svojho pracovného hárka abecedne. Toto nie je príkaz v programe Excel, ale pomocou krátkeho makra ho môžete pridať na panel s nástrojmi Rýchly prístup.
Pozeraj video
- Pam chce zoradiť karty listu podľa abecedy
- Použijem makro v zošite osobného makra
- Alt + T + M + S a zmeňte zabezpečenie makier tak, aby umožňovali makrá
- Zaznamenajte makro Hello World do zošita osobných makier
- Zadajte nový kód do osobného zošita s makrom
- Priraďte tento kód tlačidlu QAT
Prepis videa
Naučte sa Excel z Podcastu, epizóda 2084: Zoraďte karty pracovného hárka abecedne
Ahoj, vitaj späť na netcastu, som Bill Jelen. Dnešná otázka od Pam: Existuje spôsob, ako karty v pracovnom hárku zoradiť podľa abecedy? Neexistuje žiadny vstavaný spôsob, ako to urobiť, ale mohli by sme to urobiť pomocou makra. A toto je makro, ktoré by skutočne malo byť v osobnom zošite makier, dobre? Takže ak ste nikdy predtým nerobili makra, urobíme Alt + T pre Toma a pre Mary, S pre Sama. Uistite sa, že ste sa presunuli z možnosti Zakázať všetky makrá bez oznámenia na Zakázať makrá s oznámením.
V poriadku, potom stlačte kombináciu klávesov Alt + F8 a prezrite si, či máte nejaké makrá. Nezabudnite zvoliť Makrá v časti: Všetky otvorené zošity. Ak nemáte nič, čo by začínalo na PERSONAL.XLSB, musíte urobiť tieto voliteľné kroky. Ak už niečo s PERSONAL.XLSB máte, počkajte chvíľu, dobre?
Prejdeme teda na kartu Zobraziť a budeme nahrávať nové makro. Bude sa to volať HelloWorld. Žiadny priestor, žiadny priestor. Chystáme sa uložiť makro do osobného zošita makra, kliknite na tlačidlo OK. A jednoducho napíšte niekam do sveta Hello World, a potom príďte sem vedľa Ready a kliknite na Stop. Dobre, teraz vás to prinúti mať osobný zošit makra. Dobre, ak ste nikdy predtým nepoužívali makra, nemusíte to mať.
V tomto okamihu stlačíme Alt + F11 a ak ste nikdy nepoužívali makrá, dostanete sem túto sivú obrazovku. Pôjdeme do aplikácie View, Project Explorer a nájdeme nový PERSONAL.XLSB. Ak tam už máte modul, ktorý samozrejme budete, určite áno, otvoríte moduly a dvakrát kliknete na modul 1. Teraz už mám v mojom zošite osobných makier niekoľko makier, ale pôjdem priamo sem, aby som posledný riadok, vložte pár medzier.
Dobre, takže potom napíšete tento kód, ktorý som vložil. A o tomto makre hovoríme, keď ho spustím. Takže to spustím po jednom riadku stlačením klávesu F8. A jedna vec, ktorú som sa tu dozvedel, je po dokončení zoradenia. Bolo to trochu znepokojujúce, že som skončil na inom hárku, takže si pamätám, na ktorom hárku sme, takže neskôr ho môžem vybrať tesne predtým, ako bude makro hotový.
Dobre, sme tu. Vráťme sa k programu Excel a uvidíte, že prvý hárok sa volá Názov. Momentálne sme na hárku s názvom Otázka. Chcem pridať nový hárok pred Názov, urobíme teda Pracovné listy. Pridajte a potom to chcem premenovať. Momentálne sa dodáva v hárku1 ako TempSortSheet. Buďte opatrní, toto by mal byť názov, ktorý by ste nikdy náhodou nepoužívali. Nechcete to nazývať Výkaz ziskov a strát, dobre? Stačí použiť niečo veľmi náhodné, takže keď narazíme na chybu, ak už máte hárok s názvom TempSortSheet. A potom to, čo som zistil, je, že som tento Worksheet.Count používal znova a znova, takže ho jednoducho vložím do premennej, ktorá sa ľahšie povie WSC ako Worksheets.Count. Takže máme 150 pracovných listov a máme zoznam týchto pracovných listov.
Dobre, takže ste prvýkrát v cykle, kde prechádzam z 1 na 250. Prvýkrát v cykle do nášho úplne nového hárku, ktorý sme pridali, TempSortSheet, v riadku 1 stĺpci 1 ideme na prvý pracovný hárok dať hodnotu, ktorá je =. Dobre, a to by malo byť dobre, jo, TempSortSheet práve tam. Ale toto ešte párkrát nechám bežať. Stlačím kláves F8 a uvidíte, že dostávame všetky karty hárka v poradí, v akom sa vyskytujú v zošite, a predpokladám, že začnem dostávať tie karty, ktoré majú čísla účtov, v poriadku. A nechám to bežať, nechcem, aby som musel stlačiť F8 300-krát. Takže kliknem sem a prejdem na Debug, Run To Cursor, čo je Ctrl + F8, čo to dokončí. A uvidíte, že máme zoznam všetkých 150 kariet s hárkami.To je úžasné.
A teraz tu môžeme využívať silu Excelu. Existuje veľa príspevkov online, a to aj na výveske, kde sa skutočne snažia triediť. Na presunutie hárkov napíšu svoj vlastný druh a my tu budeme využívať výhody Excelu, pretože Excel má svoj druh a ja používam kód z Excelu 2003. Tento kód sa mi páči, ľahšie si ho zapamätám. Začnem v A1, zmeniť jeho veľkosť na 150 buniek, kde to roztriedim. Kľúč bude A1. No to je jediná vec, ktorá by mohla byť. Poradie bude vzostupné a nezabudnite uviesť, že existuje hlavička, dobre? Nechceme, aby sa náš TempSortSheet zoradil podľa údajov. Dobre, tak presne tam. BAM! Takto to funguje a nemusíme písať okolo kódu na triedenie bublín. A potom pôjdeme z radu 2, ktorý je A120,hárok na presun je A120. Prečo " " ? Aha, v prípade, že máte názov hárku, ako sme ho mali začiatkom tohto týždňa, ako hárok s názvom 123, ktorý by Excel zmätil. A potom, kam to posunieme? Presunieme sa nie na 2. riadok, ale za prvý hárok. Takže MoveAfter sa stane 1. Takže vezmeme náš hárok s názvom A120 a presunieme ho za prvý hárok, ako je tento, F8, a tam to fungovalo. Spustite tieto tri riadky ešte raz. A124 prichádza na správne miesto.vezmeme náš hárok s názvom A120 a presunieme ho za prvý taký hárok, F8, a tam to fungovalo. Spustite tieto tri riadky ešte raz. A124 prichádza na správne miesto.vezmeme náš hárok s názvom A120 a presunieme ho za prvý taký hárok, F8, a tam to fungovalo. Spustite tieto tri riadky ešte raz. A124 prichádza na správne miesto.
V tejto chvíli, keď už vieme, že to funguje, môžeme urobiť Ctrl + F8, ktorá vykoná všetky pohyby - práve sa tam stalo 150 pohybov. A teraz odstránim pôvodný hárok, ktorý je naším odstráneným hárkom TempSortSheet. Ale predtým, ako ho odstránim, nechcem, aby informovali kohokoľvek, kto spúšťa kód, že sa chystáme vymazať hárok. Takže to jednoducho zmažem a potom vyberiem pôvodný list a zobrazím správu, že zošity boli takto zoradené.
Dobre, takže keď už máme makro, vieme, že makro funguje a je v pracovnom zošite osobného makra, čo by sme chceli urobiť: Alt + F11 sa sem vráťte a uistite sa, že ste v osobnom makre zošit, kliknite tam a kliknite na Uložiť. Ak to teraz neuložíte, neskôr, keď ukončujete program Excel, zobrazí sa táto správa „Chcete uložiť zmeny do súboru PERSONAL.XLSB?“ a ty úplne zabudneš a neuložíš zmeny, však? Takže vždy nezabudnem uložiť zmeny a potom Alt + Tab, kde prispôsobím panel nástrojov Rýchly prístup, vyberiem z makier, nájdem ten, ktorý sa volá SortSheets, a pridám ho na panel nástrojov Rýchly prístup. Nepáči sa mi vývojový diagram, takže budeme hľadať niečo, čo hovorí A až Z, alebo viete, tak nechajmes použite tento a vložte tam malú záložku podobných triediacich hárkov, kliknite na OK, kliknite na OK.
Dobre, teraz je tu test. Vložím nový zošit. Vytvorím niekoľko kópií listov a dáme ich do zvláštnej postupnosti, Z a potom Y a potom M a potom B, podobne. Kliknite na možnosť Zoradiť listy a BAM! Sú tu späť v správnom poradí. Aké je to super.
Dobre, takže dnešná epizóda, Pam chce zoradiť karty pracovného hárka abecedne. Wow! Použili sme makro. Najskôr zmeňte zabezpečenie makra a zaznamenajte makro Hello World do zošita osobných makier a potom zadajte kód do zošita osobných makier a priraďte ho k tlačidlu panela nástrojov Rýchly prístup.
Chcem sa poďakovať Pam za túto otázku. Chcem sa vám poďakovať, že ste sa zastavili. Uvidíme sa nabudúce pri ďalšom netcaste z.
Stiahnuť súbor
Stiahnutie vzorového súboru nájdete tu: Podcast2084.xlsm