5 lahedat Microsoft Exceli makrot andmete sortimiseks

Exceli makrod ei pruugi olla nii põhjalikud kui teised automatiseerimistööriistad, kuid Exceli VBA kehtivust ja tõhusust ei saa kahjustada. Kui töötate Excelis ja muudes Microsoft Office'i tööriistades, nagu Word ja Access, ei saa te VBA ja selle võimalustega valesti minna.

MS Excel on võimas tööriist, mis pakub kasutajatele palju võimalusi. Alates andmete salvestamisest kuni automatiseeritud armatuurlaudade loomiseni saate seda kõike teha Excelis ja selle arvutustabelites.

Kui soovite kasutada VBA-d oma sortimiskohustuste automatiseerimiseks Excelis, proovige neid tõhusaid hõlpsasti rakendatavaid makrosid.

Laadige alla näiv andmekogu

Alustuseks saate oma Exceli makrooskuste täiustamiseks alla laadida näiva andmestiku.

Võite olla kindel, kui olete nendest makrodest aru saanud ja asjade toimimisest paremini aru saanud, saate koodi nihutada nii, et see sobiks teie töö või kooli jaoks mõeldud arvutustabelitega.

Kui soovite seda jälgida, saate selles artiklis kasutatud andmestiku alla laadida.

Lae alla: Exceli andmestik

1. Ühe veeru sortimine Exceli makrode abil

Kasutage seda lihtsat koodi Exceli arvutustabeli andmeveeru sortimiseks. Kui laadisite alla näiva andmestiku, võite proovida sorteerida veergu E (Müüdud ühikud).

Avage uus Exceli fail ja salvestage see rakendusega Exceli makrotoega töövihik (.xlsm) töövihiku tüüp. See fail salvestab makro, et sortida teie andmed teisest failist.

Seotud: Parimad veebikursused Exceli edasijõudnutele

Saate oma faili(sid) juhtida makrofaili kaudu, mis suhtlevad teie töövihikutega eraldi.

Sisestage järgmine kood:

Alamsorteerimine päistega()
Workbooks("Finantsnäidis.xlsx").Sheets (1).Aktiveeri
Vahemik("A1:P701").sort Key1:=Range("e1"), Järjestus1:=xlKasvav, Päis:=xlJah
Lõpeta alam

Kus:

• 1. võti: Määratlege veerud, mida soovite sortida
• Tellimus1: Järjestusmeetod (kasvav/kahanev)
• Päis: Kui teie sisul on päised, jääb see valik selliseks xlJah. Teise võimalusena valige xlNo.

Vahemik koosneb algus- ja lõpulahtri aadressist, nii et kõik jäädvustatakse sortimiseks. Tulemuseks on see, et kogu teie andmekogum sorteeritakse veerus E olevate andmete alusel.

2. Dünaamiliste andmete sortimine ühes veerus

Võib esineda juhtumeid, kus teie alguspunkt on määratletud, kuid lõpp-punkt on dünaamiline. Sellisel juhul saate muuta oma koodi dünaamiliseks, nii et see valib automaatselt vahemiku lõpu.

Andmete muudatuse arvessevõtmiseks kasutage allolevat koodi:

Alamsorteerimine päistega()
Workbooks("Finantsnäidis.xlsx").Sheets (1).Aktiveeri
Vahemik("A1", Vahemik("A1").Lõpp (xlDown)).sort Key1:=Range("e2"), Järjestus1:=xlKasvav, Päis:=xlJah
Lõpeta alam

Kus:

• Lõpp (xlDown): See funktsioon valib automaatselt viimase asustatud lahtri

Märge: kui valem kohtab veerus tühja lahtrit, käsitleb see eelnevat lahtrit vahemiku lõpuks.

Seotud: Kuidas luua Microsoft Excelis kohandatud klaviatuuri otseteid

3. Mitme veeru sortimine koos

Võib esineda olukordi, kus soovite andmeid korraga mitmesse veergu sortida. Selleks saate oma eesmärgi saavutamiseks kasutada järgmist koodi:

Sub SortMultipleColumns()
Töölehtedega ("Leht1")
 Mis .Cells (1, "A").CurrentRegion
 .Cells.sort Key1:=.Range("B1"), Order1:=xlkasvav, _
 Key2:=.Range("E1"), Order2:=xlkasvav, _
 Orientation:=xlTopToBottom, Header:=xlYes
 Lõpeta
 Lõpeta
Lõpeta alam

4. Veergude sortimine mitmel lehel

Kui tegelete mitme lehega, võiksite oma andmed armatuurlauale paigutamiseks ette valmistada. Andmete ettevalmistamise üks olulisemaid aspekte on nende sorteerimine ja andmete kindlasse vormingusse paigutamine, et neid sidusrühmadele või klientidele esitada.

Üks võimalus on igal lehel käsitsi ringi käia, vajalikud veerud sortida ja seejärel järgmise sammu juurde minna. Teise võimalusena, miks mitte lasta VBA-l seda enda eest teha?

Alloleva koodi eesmärk on liikuda läbi töövihiku iga saadaoleva lehe ja sorteerida saadaolevad andmed määratud veergude alusel.

Seotud: Microsoft Exceli otsingufunktsioonid arvutustabelite tõhusamaks otsimiseks

Saate veerge mitmel lehel sortida järgmiselt.

AlamsortimineWS()
Dim ws töölehena
'Aktiveeri kavandatud tööleht
Workbooks("Finantsnäidis.xlsx").Aktiveeri
"Siirige automaatselt läbi iga üksiku töölehe, kasutades tsüklit
Iga ws jaoks ActiveWorkbookis. Lehed
'aktiveerige iga eraldi tööleht
ws. Aktiveerige
"Määratlege vahemik ja seejärel sorteerige veerg vastavalt oma vajadustele. Sel juhul sorteeritakse ainult üks veerg.
Vahemik("A1", Vahemik("p1").Lõpp (xlDown)).sort Key1:=Range("E1"), Järjestus1:=xlKahanev, Päis:=xlJah
'Käsku kasutatakse järgmisele töölehel liikumiseks, kui eelmine tööleht on sorteeritud
Järgmine ws
Lõpeta alam

Kogu teave, mis algab üksikute jutumärkidega, on VBA kommentaarid. Neid ei täideta täitmisetapis. Iga teie lisatud VBA kommentaar on aga koodi tähendusrikas täiendus, kuna saate koodiosades määratleda olemuse, funktsionaalsuse ja muud asjakohased osad.

5. Sorteeritud andmete kopeerimine ühelt lehelt teisele

Kujutage ette olukorda, kus soovite andmeid sortida ja kopeerida kogu andmestiku (või selle osad) äsja lisatud lehele. Sellistel juhtudel saate ülesande täitmiseks kasutada allolevat koodi.

AlamsortimineWS()
Dim ws töölehena
'Aktiveeri kavandatud tööleht
Workbooks("Finantsnäidis.xlsx").Aktiveeri
"Siirige automaatselt läbi iga üksiku töölehe, kasutades tsüklit
Iga ws jaoks ActiveWorkbookis. Lehed
'aktiveerige iga eraldi tööleht
ws. Aktiveerige
"Määratlege vahemik ja seejärel sorteerige veerg vastavalt oma vajadustele. 
Sel juhul sorteeritakse ainult üks veerg.
Vahemik("A1", Vahemik("p1").Lõpp (xlDown)).sort Key1:=Range("E1"), Järjestus1:=xlKahanev, Päis:=xlJah
'Käsku kasutatakse järgmisele töölehel liikumiseks, kui eelmine tööleht on sorteeritud
Järgmine ws
"Uute andmete salvestamiseks looge töövihikus uus tööleht
Aktiivne tööraamat. Lehed. Lisama. Nimi = "Tulemused"
Kopeerige ja kleepige sorteeritud andmed äsja lisatud lehele
Sheets("Sheet1").Range("A1:p701").Kopeeri Destination:=Sheets("Results").Range("a1")
Lõpeta alam

Ülaltoodud kood sorteerib väärtused veerus E, lisab uue lehe Tulemused olemasolevasse töövihikusse ja kleepige sorteeritud tulemused lahtrisse A1.

Sortimismakrode loomine Excelis

Excel VBA on suurepärane keel, mis võib säästa palju aega ja vaeva. VBA-makrosid kasutades saate luua ulatuslikke armatuurlaudu, sorteerida andmeid mõne klõpsuga ja täita hõlpsalt erinevaid funktsioone.

Õnneks ei lõpe Exceli funktsionaalsus makrodega. Vaadake mõningaid näpunäiteid ja nippe, kuidas saada tõhusamaks Exceli kasutajaks.

9 parimat veebisaiti ja ajaveebi Exceli näpunäidete ja näpunäidete õppimiseks

Olenemata sellest, kas olete Exceli meister või alles alustate, on siin üheksa populaarseimat veebisaiti ja ajaveebi, mille abil saate näpunäiteid ja nippe õppida.

Loe edasi

Autori kohta