Excel Sort & Naredba za filtriranje ima ograničen raspon na Podaci filtriranja . Ali koristeći VBA možete Filtrirati podatke u širokom rasponu kako želite. Ovaj članak će vam pružiti 8 korisnih primjera za korištenje VBA koda za filtriranje podataka u excelu koristeći VBA kodove sa živopisnim ilustracijama.

Preuzmite vježbenicu

Ovdje možete preuzeti besplatni Excel predložak i vježbati sami.

8 primjera za korištenje VBA koda za filtriranje podataka u Excelu

Upoznajmo se prvo s našim skupom podataka koji predstavlja spol, status i status nekih učenika Dob .

1. Koristite VBA kod za filtriranje podataka na osnovu tekstualnih kriterija u Excelu

U našem prvom primjeru, koristit ćemo VBA za Filter samo Muški učenici iz kolone Spol skupa podataka.

Koraci:

• Kliknite desnim tasterom miša na naslovu lista .
• Zatim odaberite Prikaži kod iz kontekstnog menija .

Uskoro nakon toga će se otvoriti VBA prozor.

• Upišite sljedeće kodove u it-

6883

• Kasnije, minimizirajte VBA

Razbijanje koda

• Ovdje sam kreirao Sub proceduru, Filter_Data_Text() .
• Zatim sam koristio Raspon svojstvo za deklariranje našeg odgovarajućeg ime lista i opseg
• Dalje, koristio sam metod automatskog filtriranja da koristim Kriterijum po svom izboru gdje Polje:=2 znači kolona 2 . I Criteria1:=”Muški” za Filtriraj podatke za Muški.

• Nakon toga, na otvorite Makro okvir za dijalog , kliknite na sljedeći način: Razvojnik > Makroi.

• Odaberite Naziv makroa kako je navedeno u kodovima .
• Konačno, samo pritisnite Run .

Sada pogledajte da imamo samo Podaci učenika nakon Filtriranja .

Pročitajte više: Excel Filtriraj podatke na osnovu Vrijednost ćelije (6 efikasnih načina)

2. Primijenite VBA kod na filtriranje podataka s više kriterija u jednoj koloni

Ovdje ćemo Filtrirati za više kriterija u jednoj koloni. Iz kolone broj tri skupa podataka, Filtrirat ćemo za diplomske i postdiplomske studente.

Koraci:

• Slijedite prva dva koraka prvog primjera da otvorite VBA prozor .
• Kasnije, upišite sljedeće kodove u njega-

8972

• Zatim minimizirajte VBA

Raščlamba koda

• Ovdje sam kreirao Sub proceduru, Filter_One_Column() .
• Zatim je koristio svojstvo Range da deklariramo naše odgovarajuće ime lista i opseg
• Zatim sam koristio theMetoda automatskog filtriranja za korištenje Kriterijuma po mom izboru gdje Polje:=3 znači kolona 3 . Ovdje, Kriterij1:=”Diplomirani” i Kriteriji2:=”Postdiplomski” za Filtriraj Status studenta.
• Konačno, koristio sam Operator:=xlOr da primijenim ILI uvjet Filter za više kriterija.

• Ovdje trenutka, slijedite treći korak iz prvog primjera da otvorite makro dijalog kutiju .
• Kasnije, odaberite navedeni ime makroa i pritisnite Run .

Ubrzo nakon toga, dobićete filtrirane redove na osnovu više kriterijuma kao na slici ispod.

Pročitajte više: Filtriraj više kriterijuma u Excelu (4 pogodna načina)

3. Primijenite VBA kod na filtriranje podataka s više kriterija u različitim stupcima u Excel-u

Sada ćemo Filtrirati za više kriterija- muški i diplomirani učenici.

Koraci:

• Pratite prva dva koraka od prvog primjera do otvorite VBA
• Kasnije, napišite sljedeće kodove u njega-

6435

• Nakon koji minimiziraju VBA prozor .

Razbijanje koda

• Ovdje sam kreirao Sub proceduru, Filter_Different_Columns() .
• Zatim sam koristio With naredbu da koristim Višestruki stupac .
• Zatim se koristi Raspon svojstvo za deklariranje našeg odgovarajućeg ime lista i opseg
• Dalje, koristio sam metod AutoFilter da koristim Kriterijum od moj izbor gdje Polje:=2 znači kolona 2 a Polje:=3 znači kolona 3 .
• Ovdje , odabrano Kriteriji1:=”Muški” za Spol stupac i Kriterijum1:=”Diplomirani” za Status stupac u Filter podaci iz različitih kolona .

• Zatim slijedite treći korak iz prvog primjera da otvorite Makro okvir za dijalog .
• Kasnije, odaberite navedeni ime makroa i pritisnite Run .

Ovdje je izlaz višestrukih kriterija.

Pročitajte više: Excel VBA za filtriranje u istoj koloni prema više kriterija (6 primjera)

4. Koristite VBA kod za filtriranje top 3 stavke u Excelu

U ovom primjeru ćemo filtrirati najbolja tri učenika prema njihovoj dob .

Koraci:

• Pratite prva dva koraka od prvog primjera da otvorite VBA prozor .
• Zatim upišite sljedeće kodove u to-

6475

• Nakon toga minimizirajte VBA prozor .

Razbijanje koda

• Evo, ja kreirao Sub proceduru, Filter_Top3_Items() .
• A zatim koristi Operator:=xlTop10Items do Filter za prva tri podaci .

• Sada slijedite treći korak iz prvog primjera da otvorite Dijalog makronaredbi box .
• Zatim odaberite ime makroa kako je navedeno u kodovima i pritisnite Run .

Tada ćete dobiti izlaz kao na slici ispod-

Pročitajte više: Kako filtrirati na osnovu vrijednosti ćelije koristeći Excel VBA (4 metode)

Slična očitanja

• Kako kopirati i zalijepiti kada Filter se primjenjuje u Excelu
• Kako filtrirati jedinstvene vrijednosti u Excelu (8 jednostavnih načina)
• Filtrirajte više kriterija u Excelu pomoću VBA (oba Tipovi I i ILI)
• Kako koristiti filter teksta u Excelu (5 primjera)
• Kako filtrirati po datumu u Excelu (4 brza Metode)

5. Koristite VBA kod za filtriranje najboljih 50 posto u Excelu

Hajde da koristimo VBA kodove za filtriranje toph pedeset posto učenika na osnovu njihove dobi .

Koraci:

• Prvo, Slijedite prva dva koraka prvog primjera da otvorite VBA prozor .
• Kasnije, upišite sljedeće kodove u njega-

4654

• Minimizirajte VBA prozor .

Razbijanje koda

• Ovdje sam kreirao Sub proceduru, Filter_Top50_Percent() .
• Kasnije koristio Operator:=xlTop10Percent do Filtrirajte najboljih pedeset posto kolona-4 .

• U ovom trenutku, slijedite treći korak od prvog primjera da otvorite Makro okvir za dijalog.
• Zatim odaberite navedeni ime makroa i pritisnite Run .

Bilo je ukupno 7 učenika tako da za 50 posto prikazuje otprilike tri učenika .

Pročitajte više: Kako koristiti formulu za postotak dobiti u Excelu (3 primjera)

6 . Primijenite VBA kod na filtriranje podataka pomoću zamjenskog znaka

Možemo koristiti zamjenski znakovi-* (zvjezdica) u VBA kodovima za filtriranje podataka u Excelu. Iz Status stupca , filtrirat ćemo samo vrijednosti koje sadrže 'Post' .

Koraci:

• Pratite prva dva koraka prvog primjera da otvorite VBA prozor .
• Zatim napišite sljedeći kodovi u njemu-

5581

• Kasnije, minimizirajte VBA prozor .

Raščlamba koda

• Ovdje sam kreirao Sub proceduru, Filter_with_Wildcard() .
• Potom se koristi Raspon (“B4”) za postavljanje raspona.
• Sljedeće , koristi se AutoFilter do Filter u Polje:=3 znači kolona 3.
• Kriterijumi1:=”*Post *” za Filtriraj vrijednosti koje sadrže 'Post'.

• Sada slijedite treći korak od prvog primjer da otvorite Makro dijalogbox.
• Odaberite navedeni ime makroa i pritisnite Run .

Tada ćete dobiti željeni rezultat.

Pročitajte više: Kako dodati filter u Excel (4 metode )

7. Ugradite Excel VBA da biste kopirali filtrirane podatke u novi list u Excel-u

Vidite da postoje neki filtrirani podaci u mom skupu podataka. Sada ću ih kopirati u novi list koristeći VBA . Ovi kodovi neće raditi ispravno u listu, morat ćete ih primijeniti u modulu.

Koraci:

• Pritisnite Alt+F11 da otvorite VBA

• Zatim kliknite Insert > Modul za otvorite modul .

• Sada napišite sljedeće kodove –

8277

• Zatim minimizirajte VBA

Raščlamba koda

• Ovdje sam kreirao Sub proceduru, Copy_Filtered_Data_NewSheet() .
• Nakon toga deklarirano s dvije varijable- x Rng As Range i xWS Kao radni list.
• Zatim se koristi an IF izraz za provjerite Filtered
• Kasnije, koristi se MsgBox za prikaz izlaza.
• Zatim se koristi Worksheets(“Copy Filtered Data”).AutoFilter .Range za odabir Filtered raspona i koristi Add za dodavanje novog lista.
• Konačno, Copy Range(“G4”) će kopirati Filtrirane podatke u novi list .

• Kasnije, slijeditetreći korak iz prvog primjera da otvorite Makro okvir za dijalog .
• Zatim odaberite navedeno Makro ime i pritisnite Run .

Sada vidite da je Excel otvorio novi list i kopirao filtrirane redove.

Pročitajte više: Prečica za Excel filter (3 brze upotrebe s primjerima)

8. Primijenite VBA kod na filtriranje podataka pomoću padajuće liste

U našem posljednjem primjeru, prvo ćemo napraviti padajuću listu za spolove, a zatim ćemo je koristiti za filtriranje podataka. Za to sam postavio kriterije spola na drugu lokaciju i napravićemo padajuću listu u ćeliji D14 .

Koraci:

• Odaberite ćeliju D14 .
• Zatim kliknite na sljedeći način: Podaci > Alati za podatke > Validacija podataka > Validacija podataka.

Ubrzo nakon toga, otvorit će se dijaloški okvir .

Odaberi Lista iz padajućeg izbornika Dozvoli .

Zatim kliknite na ikonu Otvori u izvornom polju .

Sada odaberite raspon kriterija i pritisnite tipku Enter .

• U ovom trenutku, samo pritisnite OK .

Sada je naša padajuća lista spremna.

• Sada Slijedite prva dva koraka prvog primjera da otvorite VBA prozor .
• Zatim napišite sljedeće kodove u njega-

1277

• Zatim minimizirajte VBAprozor .

Razbijanje koda

• Evo, kreirao sam a Privatna pod procedura, Promjena_radnog lista(ByVal Target As Range).
• Zatim sam izabrao Radni list iz Općenito i Promijeni iz Deklaracije .
• Zatim postavite Adresu da biste znali lokaciju.
• Konačno unutar IF naredbe koristi se AutoFilter metoda sa Poljem i Kriterijumi

• Sada samo odaberite kriterije sa padajuće liste i Filter će biti aktiviran .

Ovo je Filtriran izlaz nakon odabira Muški sa padajućeg izbornika .

Pročitajte više: Kako filtrirati po listi na drugom listu u Excelu (2 metode)

Odjeljak za vježbu

Dobit ćete vježbu u Excel datoteci datoj gore kako biste vježbali na objašnjene načine.

Zaključak

Nadam se da će gore opisane procedure biti dovoljno dobre za korištenje VBA koda za Filtriranje podataka u excelu. Slobodno postavite bilo koje pitanje u odjeljku za komentare i pošaljite mi povratne informacije.