VBA kóða til að sía gögn í Excel (8 dæmi)

Hugh West

24-10-2023 Fjölvi & amp; Excel VBA
  • Deildu Þessu
Hugh West

Excel Raða & Síuskipun hefur takmarkað svið til Sía gögn . En með því að nota VBA geturðu Síað gögn á breitt svið eins og þú vilt. Þessi grein mun veita þér 8 gagnleg dæmi til að nota VBA kóða til að sía gögn í Excel með því að nota VBA kóða með lifandi myndum.

Hlaða niður æfingarvinnubók

Þú getur halað niður ókeypis Excel sniðmátinu héðan og æft á eigin spýtur.

VBA kóða til að sía gögn.xlsm

8 dæmi til að nota VBA kóða til að sía gögn í Excel

Við skulum kynnast gagnasafninu okkar fyrst sem táknar kyn, stöðu og stöðu sumra nema Aldur .

1. Notaðu VBA kóða til að sía gögn byggð á textaviðmiðum í Excel

Í fyrsta dæminu okkar munum við nota VBA til að sía aðeins Karlkyns nemendur úr Kyn dálkinum gagnasafnsins.

Skref:

  • Hægri-smelltu á heiti blaðsins .
  • Veldu síðan Skoða kóða í samhengisvalmyndinni .

Bráðum eftir opnast VBA gluggi.

  • Sláðu inn eftirfarandi kóða í it-
Sub Filter_Top50_Percent() ActiveSheet.Range("B4").AutoFilter Field:=4, Criteria1:="50", Operator:=xlTop10Percent End Sub
  • Síðar skaltu lágmarka VBA

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Filter_Data_Text() .
  • Notaði síðan Range eign til að lýsa yfir viðkomandi blaðsheiti og svið
  • Næst notaði ég AutoFilter aðferðina til að nota viðmið að eigin vali þar sem Field:=2 þýðir dálkur 2 . Og Criteria1:=”Male” til að Sía gögnin fyrir Karl.
  • Eftir það, til að opnaðu Macros valmyndina , smelltu á sem hér segir: Hönnuði > Fjölvi.

  • Veldu Macro heiti eins og nefnt er í kóðum .
  • Að lokum skaltu bara ýta á Run .

Skoðaðu nú að við höfum aðeins 1>Gögn karlkyns nemenda eftir síun .

Lesa meira: Excel síugögn byggt á Frumugildi (6 skilvirkar leiðir)

2. Notaðu VBA kóða til að sía gögn með mörgum forsendum í einum dálki

Hér munum við sía fyrir mörg skilyrði í einum dálki. Frá dálki númer þrjú í gagnasafninu munum við sía fyrir útskrifaða og framhaldsnema .

Skref:

  • Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opna VBA gluggann .
  • Síðar, sláðu inn eftirfarandi kóða í það- 
6042
  • Lágmarkaðu síðan VBA

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Filter_One_Column() .
  • Notaði síðan eiginleikann Range til að gefa upp heiti blaðs okkar og svið
  • Næst notaði ég theAutoFilter aðferð til að nota viðmið að eigin vali þar sem Field:=3 þýðir dálkur 3 . Hér, Criteria1:=”Graduate” og Criteria2:=”Postgraduate” til að sía stöðu nemandans .
  • Að lokum notaði ég Operator:=xlOr til að beita EÐA skilyrði Síu fyrir mörg skilyrði.
  • Á þessu augnablik, fylgdu þriðja skrefinu úr fyrsta dæminu til að opna Macros gluggann reitinn .
  • Síðar skaltu velja tilgreint Macro nafn og ýta á Run .

Stuttu síðar færðu síaðar línur byggðar á mörgum forsendum eins og á myndinni hér að neðan.

Lesa meira: Sía mörg skilyrði í Excel (4 hentugar leiðir)

3. Notaðu VBA kóða til að sía gögn með mörgum skilyrðum í mismunandi dálkum í Excel

Nú munum við sía fyrir mörg skilyrði- Karlkyns og útskrifast nemendur.

Skref:

  • Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opnaðu VBA
  • Síðar, skrifaðu eftirfarandi kóða í það- 
6873
  • Eftir sem minnkar VBA gluggann .

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Filter_Different_Columns() .
  • Þá notaði ég Með setninguna til að nota Margfaldur dálkur .
  • Notaði síðan svið eign til að gefa upp blaðsnafn okkar og svið
  • Næst notaði ég sjálfvirka síuaðferð til að nota viðmið af mitt val þar sem Figur:=2 þýðir dálkur 2 og Figur:=3 þýðir dálkur 3 .
  • Hér , valin Criteria1:=“Male” fyrir Kyn dálkinn og Criteria1:=“Graduate” fyrir Staða dálkinn í Sía gögn frá mismunandi dálkum .
  • Síðan fylgið þriðja skrefinu úr fyrsta dæminu til að opna Macros valmynd .
  • Síðar skaltu velja tilgreint Macro name og ýta á Run .

Hér er framleiðsla margra viðmiðana.

Lesa meira: Excel VBA að sía í sama dálki eftir mörgum forsendum (6 dæmi)

4. Notaðu VBA kóða til að sía efstu 3 atriðin í Excel

Í þessu dæmi munum við sía þrír bestu nemendurna eftir aldur þeirra .

Skref:

  • Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opna VBA gluggann .
  • Sláðu síðan inn eftirfarandi kóða í það- 
5971
  • Eftir það lágmarkaðu VBA gluggi .

Kóðasundurliðun

  • Hér, ég bjó til Sub aðferð, Filter_Top3_Items() .
  • Og notaði síðan Operator:=xlTop10Items til að Sía fyrir efstu þrír gögn .
  • Nú fylgið þriðja skrefinu úr fyrsta dæminu til að opna Macros dialog box .
  • Veldu síðan Macro name eins og nefnt er í kóðanum og ýttu á Run .

Þá færðu úttakið eins og myndina hér að neðan-

Lesa meira: Hvernig á að sía byggt á frumgildi með því að nota Excel VBA (4 aðferðir)

Svipuð lestur

  • Hvernig á að afrita og líma þegar Sía er notuð í Excel
  • Hvernig á að sía einstök gildi í Excel (8 auðveldar leiðir)
  • Sía margfeldi skilyrði í Excel með VBA (bæði OG og EÐA gerðir)
  • Hvernig á að nota textasíu í Excel (5 dæmi)
  • Hvernig á að sía eftir dagsetningu í Excel (4 fljótir Aðferðir)

5. Notaðu VBA kóða til að sía efstu 50 prósentin í Excel

Notum VBA kóða til að sía 50% efstu nemenda miðað við aldur þeirra .

Skref:

  • Fyrst Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opna VBA gluggann .
  • Síðar slærðu inn eftirfarandi kóða í það- 
9583
  • Lágmarkaðu VBA gluggann .

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Filter_Top50_Percent() .
  • Síðar notaði Operator:=xlTop10Percent til Sía efstu fimmtíu prósentin frá dálkur-4 .
  • Í augnablikinu skaltu fylgja þriðja skrefinu úr fyrsta dæminu til að opna 1>Macros valmynd.
  • Veldu síðan tilgreint Macro name og ýttu á Run .

Alls voru 7 nemendur þannig að fyrir 50 prósent sýnir það um það bil þrjá nemendur .

Lesa meira: Hvernig á að nota hagnaðarhlutfallsformúlu í Excel (3 dæmi)

6 . Notaðu VBA kóða til að sía gögn með því að nota algildisstaf

Við getum notað Wildcard stafi-* (stjörnu) í VBA kóða til að sía gögn í Excel. Frá Status dálknum munum við sía aðeins gildin sem innihalda 'Post' .

Skref:

  • Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opna VBA gluggann .
  • Síðan skrifaðu eftirfarandi kóðar í henni- 
1310
  • Síðar skaltu lágmarka VBA gluggann .

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Filter_with_Wildcard() .
  • Notaði síðan Range (“B4”) til að stilla bilið.
  • Næsta , notað Sjálfvirk sía í Sía í reit:=3 þýðir dálk 3.
  • Criteria1:=”*Posta *” til að sía gildin sem innihalda 'Post'.
  • Nú fylgið þriðja skrefinu frá því fyrsta dæmi til að opna fjölvagluggannkassi.
  • Veldu tilgreint Macro nafn og ýttu á Run .

Þá færðu viðeigandi úttak.

Lesa meira: Hvernig á að bæta við síu í Excel (4 aðferðir )

7. Fella Excel VBA inn til að afrita síuð gögn í nýtt blað í Excel

Sjáðu að það eru nokkur síuð gögn í gagnasafninu mínu. Nú mun ég afrita þau á nýtt blað með VBA . Þessir kóðar munu ekki virka rétt í blaðinu, þú verður að nota þá í einingunni.

Skref:

  • Ýttu á Alt+F11 til að opna VBA

  • Smelltu síðan á Insert > Eining til að opna mát .

  • Nú skrifaðu eftirfarandi kóða – 
2717
  • Lágmarkaðu síðan VBA

Kóðasundurliðun

  • Hér bjó ég til Sub aðferð, Copy_Filtered_Data_NewSheet() .
  • Eftir það lýsti yfir tveggja breytu- x Rng sem svið og xWS sem vinnublað.
  • Notaði síðan IF setning til að hakaðu við Filtered
  • Síðar, notaði MsgBox til að sýna úttakið.
  • Notaði síðan Worksheets(“Copy Filtered Data”). AutoFilter .Range til að velja Filtered sviðið og notaði Add til að bæta við nýju blaði.
  • Að lokum, Copy Range(“G4”) mun afrita Síuð gögnin yfir á nýja blaðið .
  • Síðar skaltu fylgjaþriðja skrefið úr fyrsta dæminu til að opna Macros svargluggann .
  • Veldu síðan tilgreint Macro name og ýttu á Run .

Sjáðu nú að Excel hefur opnað nýtt blað og afritað síaðar línurnar.

Lesa meira: Flýtileið fyrir Excel síu (3 fljótleg notkun með dæmum)

8. Notaðu VBA kóða til að sía gögn með fellilista

Í síðasta dæminu okkar munum við fyrst búa til fellilista fyrir kyn og síðan notum við hann til að sía gögn. Fyrir það hef ég sett kynviðmiðin á annan stað og við munum búa til fellilista í klefi D14 .

Skref:

  • Veldu Hólf D14 .
  • Smelltu síðan á eftirfarandi: Gögn > Gagnaverkfæri > Gagnaprófun > Gagnaprófun.

Skömmu síðar opnast valgluggi .

Veldu Listi úr Leyfa fellivalmyndinni .

Smelltu síðan á Opna táknið í Upprunareitnum .

Nú velurðu viðmiðunarsviðið og ýtir á Enter hnappinn .

  • Í augnablikinu skaltu bara ýta á OK .

Nú er fellilisti okkar tilbúinn.

  • Nú Fylgdu fyrstu tveimur skrefunum í fyrsta dæminu til að opna VBA gluggann .
  • Skrifaðu síðan eftirfarandi kóða í það- 
5703
  • Skrifaðu síðan minnkaðu VBAgluggi .

Kóðasundurliðun

  • Hér bjó ég til a Private Sub aðferð, Worksheet_Change(ByVal Target As Range).
  • Þá valdi ég Vinnublað úr Almennt og Breyta úr Yfirlýsingum .
  • Stilltu síðan Heimilisfangið til að vita staðsetninguna.
  • Að lokum notaði EF yfirlýsinguna Sjálfvirka síun aðferðina með Reit og Forsendur
  • Nú er bara veljið skilyrði úr fellilistanum og Sían verður virkjuð .

Hér er Síað úttakið eftir að hafa valið Karlkyns í valmyndinni .

Lesa meira: Hvernig á að sía eftir lista í öðru blaði í Excel (2 aðferðir)

Æfingahluti

Þú færð æfingablað í Excel skjalinu hér að ofan til að æfa útskýrðar leiðir.

Niðurstaða

Ég vona að aðferðirnar sem lýst er hér að ofan verði nógu góðar til að nota VBA kóða til að sía gögn í Excel. Ekki hika við að spyrja hvaða spurninga sem er í athugasemdahlutanum og vinsamlegast gefðu mér álit.

Fyrri færsla Excel VBA: Háþróuð sía með mörgum viðmiðum á bilinu (5 aðferðir) -
Næsta færsla Hvernig á að nota Format Painter flýtileið í Excel (5 leiðir)

Hugh West er mjög reyndur Excel þjálfari og sérfræðingur með yfir 10 ára reynslu í greininni. Hann er með BA gráðu í bókhaldi og fjármálum og meistaragráðu í viðskiptafræði. Hugh hefur ástríðu fyrir kennslu og hefur þróað einstaka kennsluaðferð sem auðvelt er að fylgja eftir og skilja. Sérfræðiþekking hans á Excel hefur hjálpað þúsundum nemenda og fagfólks um allan heim að bæta færni sína og skara fram úr í starfi. Í gegnum bloggið sitt deilir Hugh þekkingu sinni með heiminum og býður upp á ókeypis Excel námskeið og netþjálfun til að hjálpa einstaklingum og fyrirtækjum að ná fullum möguleikum.