Makrá Excelu nemusia byť také komplexné ako iné automatizačné nástroje, ale platnosť a efektívnosť Excel VBA nemožno podkopať. Ak pracujete v Exceli a iných nástrojoch balíka Microsoft Office, ako sú Word a Access, s VBA a jeho schopnosťami nemôžete urobiť chybu.
MS Excel je výkonný nástroj, ktorý svojim používateľom ponúka množstvo možností. Od ukladania údajov až po vytváranie automatizovaných informačných panelov to všetko môžete robiť v Exceli a jeho tabuľkách.
Ak chcete použiť VBA na automatizáciu svojich povinností pri triedení v Exceli, vyskúšajte tieto efektívne, jednoducho použiteľné makrá.
Stiahnite si fiktívnu množinu údajov
Na začiatok si môžete stiahnuť fiktívnu množinu údajov, aby ste mohli pracovať na svojich znalostiach makier v Exceli.
Buďte si istí, že keď sa naučíte tieto makrá a lepšie pochopíte, ako veci fungujú, môžete posunúť kód tak, aby vyhovoval vašim vlastným tabuľkám do práce alebo do školy.
Môžete si stiahnuť súbor údajov použitý v tomto článku, ak ho chcete sledovať.
Stiahnuť ▼: Súbor údajov programu Excel
1. Triedenie jedného stĺpca pomocou makier programu Excel
Pomocou tohto jednoduchého kódu zoraďte stĺpec údajov v tabuľke Excel. Ak ste si stiahli fiktívnu množinu údajov, môžete skúsiť zoradiť stĺpec E (Predané jednotky).
Otvorte nový súbor Excel a uložte ho pomocou súboru Zošit Excel s podporou makier (.xlsm) typ zošita. Tento súbor uloží makro na triedenie údajov z iného súboru.
Súvisiace: Najlepšie online kurzy na zvládnutie pokročilého Excelu
Súbor (y) budete ovládať zo súboru makra, ktorý bude interagovať s vašimi zošitmi samostatne.
Zadajte nasledujúci kód:
Sub sortwithheaders()
Pracovné zošity("Finančná vzorka.xlsx").Hárky (1).Aktivovať
Rozsah("A1:P701").Kľúč triedenia1:=Rozsah("e1"), Poradie1:=xlVzostupne, Hlavička:=xlÁno
End Sub
Kde:
- Key1: Definujte stĺpce, ktoré chcete zoradiť
- Objednávka 1: Spôsob objednávania (vzostupne/zostupne)
- Hlavička: Ak má váš obsah hlavičky, táto možnosť zostane ako xlÁno. Prípadne vyberte xlNo.
Rozsah bude pozostávať zo začiatočnej bunky a koncovej adresy bunky, aby sa všetko zachytilo na účely triedenia. Výsledkom je, že celá vaša množina údajov bude zoradená na základe údajov v stĺpci E.
2. Triedenie dynamických údajov v jednom stĺpci
Môžu nastať prípady, keď je váš počiatočný bod definovaný, ale váš koncový bod je dynamický. V takom prípade môžete urobiť svoj kód dynamickým, aby automaticky vybral koniec rozsahu.
Na prispôsobenie sa zmene údajov použite nasledujúci kód:
Sub sortwithheaders()
Pracovné zošity("Finančná vzorka.xlsx").Hárky (1).Aktivovať
Rozsah("A1", Rozsah("A1")).End (xlDown)).Kľúč zoradenia1:=Rozsah("e2"), Poradie1:=xlVzostupne, Hlavička:=xlÁno
End Sub
Kde:
- Koniec (xlDown): Táto funkcia automaticky vyberie poslednú vyplnenú bunku
Poznámka: Ak vzorec narazí na prázdnu bunku v stĺpci, predchádzajúcu bunku bude považovať za koniec rozsahu.
Súvisiace: Ako vytvoriť vlastné klávesové skratky v programe Microsoft Excel
3. Zoraďovanie viacerých stĺpcov spolu
Môžu nastať situácie, keď budete chcieť zoradiť údaje vo viacerých stĺpcoch naraz. Ak to chcete urobiť, na dosiahnutie svojho účelu môžete použiť nasledujúci kód:
SubSortMultipleColumns()
S pracovnými hárkami ("Hárok1")
S .Cells (1, "A").CurrentRegion
.Cells.sort Key1:=.Range("B1"), Order1:=xlAscending, _
Key2:=.Range("E1"), Order2:=xlAscending, _
Orientácia:=xlTopToBottom, Hlavička:=xlYes
Koniec s
Koniec s
End Sub
4. Triedenie stĺpcov na viacerých hárkoch
Keď máte čo do činenia s viacerými hárkami, možno budete chcieť svoje údaje pripraviť na vloženie do dashboardu. Jedným z najdôležitejších aspektov prípravy údajov je ich triedenie a usporiadanie údajov do určitého formátu, aby sa mohli prezentovať vašim zainteresovaným stranám alebo klientom.
Jednou z možností je manuálne prechádzať každým hárkom, triediť požadované stĺpce a potom prejsť na ďalší krok. Prípadne, prečo nenechať VBA to urobiť za vás?
Zámerom nižšie uvedeného kódu je prechádzať každým dostupným hárkom v zošite a na základe zadaných stĺpcov zoradiť dostupné údaje.
Súvisiace: Funkcie vyhľadávania v programe Microsoft Excel na efektívnejšie vyhľadávanie tabuliek
Tu je postup, ako môžete zoradiť stĺpce na viacerých hárkoch:
Sub SortWS()
Dim ws As Worksheet
'Aktivujte zamýšľaný pracovný hárok
Workbooks("Finančná vzorka.xlsx").Aktivovať
'Automaticky prechádzajte každým jednotlivým pracovným hárkom pomocou cyklu for
Pre každý ws In ActiveWorkbook. Listy
„aktivujte každý jednotlivý pracovný hárok
ws. Aktivovať
'Definujte rozsah a potom zoraďte stĺpce podľa svojich požiadaviek. V tomto prípade sa zoraďuje iba jeden stĺpec.
Rozsah("A1", Rozsah("p1")).End (xlDown)).Kľúč zoradenia1:=Rozsah("E1"), Poradie1:=xlZostupne, Hlavička:=xlÁno
'Príkaz sa používa na prechod na ďalší pracovný hárok, keď bol predchádzajúci pracovný hárok zoradený
Ďalšie ws
End Sub
Všetky informácie začínajúce jednoduchými úvodzovkami sú komentáre VBA. Tieto sa nevykonávajú počas fázy vykonávania. Každý komentár VBA, ktorý pridáte, je však zmysluplným doplnkom kódu, pretože v sekciách kódu môžete definovať podstatu, funkčnosť a ďalšie relevantné časti.
5. Kopírovanie zoradených údajov z jedného hárku na druhý
Predstavte si situáciu, že chcete údaje zoradiť a skopírovať celý súbor údajov (alebo jeho časti) do novo pridaného hárku. V takýchto prípadoch môžete na vykonanie úlohy použiť nasledujúci kód:
Sub SortWS()
Dim ws As Worksheet
'Aktivujte zamýšľaný pracovný hárok
Workbooks("Finančná vzorka.xlsx").Aktivovať
'Automaticky prechádzajte každým jednotlivým pracovným hárkom pomocou cyklu for
Pre každý ws In ActiveWorkbook. Listy
„aktivujte každý jednotlivý pracovný hárok
ws. Aktivovať
'Definujte rozsah a potom zoraďte stĺpce podľa svojich požiadaviek.
„V tomto prípade sa triedi iba jeden stĺpec.
Rozsah("A1", Rozsah("p1")).End (xlDown)).Kľúč zoradenia1:=Rozsah("E1"), Poradie1:=xlZostupne, Hlavička:=xlÁno
'Príkaz sa používa na prechod na ďalší pracovný hárok, keď bol predchádzajúci pracovný hárok zoradený
Ďalšie ws
'Vytvorte nový pracovný hárok v zošite na uloženie nových údajov
Aktívny zošit. Listy. Pridať. Name = "Výsledky"
Skopírujte a vložte zoradené údaje do novo pridaného hárka
Sheets("Sheet1").Range("A1:p701").Copy Destination:=Sheets("Results").Range("a1")
End Sub
Vyššie uvedený kód zoradí hodnoty v stĺpci E, pridá nový hárok Výsledky do existujúceho zošita a prilepte zoradené výsledky do bunky A1.
Vytváranie triediacich makier v Exceli
Excel VBA je šikovný jazyk, ktorý vám môže ušetriť veľa času a úsilia. Pomocou makier VBA môžete vytvárať rozsiahle ovládacie panely, jednoducho triediť údaje niekoľkými kliknutiami a jednoducho vykonávať rôzne funkcie.
Našťastie funkčnosť Excelu nekončí makrami. Pozrite si niekoľko tipov a trikov, aby ste sa stali efektívnejšími používateľmi Excelu.
Či už ste majstrom Excelu alebo len začínate, tu je deväť najlepších webových stránok a blogov, pomocou ktorých sa môžete naučiť niekoľko tipov a trikov.
Prečítajte si ďalej
- Programovanie
- Microsoft Excel
- Makrá
Gaurav Siyal má dvojročné skúsenosti s písaním, písaním pre sériu digitálnych marketingových firiem a dokumentov životného cyklu softvéru.
prihlásiť sa ku odberu noviniek
Pripojte sa k nášmu bulletinu a získajte technické tipy, recenzie, bezplatné e-knihy a exkluzívne ponuky!
Kliknutím sem sa prihlásite na odber