Kaip filtruoti duomenis „Excel“ naudojant VBA

Anonim

Šiame straipsnyje mes sužinosime, kaip filtruoti duomenis ir kaip mes galime pateikti skirtingus filtravimo kriterijus, naudodami „Microsoft Excel 2007“ ir naujesnės versijos VBA.

Kaip įdėti filtrą į duomenis?

Norėdami suprasti, kaip įdėti filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti sausio mėnesio duomenis, filtrą turime įdėti į sausio mėnesį. Norėdami įdėti filtrą per VBA, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomi filtrų duomenys ()

Diapazonas („A1“). Automatinio filtro laukas: = 1, 1 kriterijus: = „Jan“

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turime apibrėžti kriterijus.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime tik Jano duomenis.

Kaip įdėti 10 apatinių elementų filtrą?

Norėdami suprasti, kaip įdėti 10 apatinių elementų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti 10 apatinių duomenų paspaudimų, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomas filtras apačioje10 ()

Diapazonas ("A1"). Automatinio filtro laukas: = 3, 1 kriterijus: = "10", operatorius: = xlBottom10Items

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, o tada turime apibrėžti kriterijus, pagal kuriuos filtruojami 10 apatinių elementų duomenys.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime tik apatinio 10 paspaudimo duomenis.

Kaip įdėti filtrą apatiniams 10 procentų duomenų?

Norėdami suprasti, kaip įdėti apatinių 10 procentų duomenų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti apatinius 10 procentų duomenis, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomas filtras apačioje 10 procentų ()

Diapazonas („A1“). Automatinio filtro laukas: = 3, 1 kriterijus: = „10“, operatorius: = xlBottom10Percent

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turime apibrėžti kriterijus, pagal kuriuos filtruojami apatiniai 10 proc.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime tik apatinius 10 procentų duomenis.

Kaip įdėti filtrą apatiniam X duomenų elementų skaičiui?

Norėdami suprasti, kaip įdėti apatinių X skaičių filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti apatinį x duomenų skaičių, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Antrinis filtras - apatinis skaičius ()

Diapazonas („A1“). Automatinio filtro laukas: = 3, 1 kriterijus: = „5“, operatorius: = xlBottom10Items

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia mes pasirenkame duomenų diapazoną, į kurį norime įdėti filtrą, tada nurodėme kriterijus, pagal kuriuos filtruojame 5 apatinių 10 skaičių numerius.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, duomenys bus filtruojami ir matysime tik 10 apatinių paspaudimų duomenis.

Kaip įdėti filtrą apatiniams x procentams duomenų?

Kad suprastume, kaip įdėti apatinio x proc. Duomenų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti apatinius x procentinius duomenis, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomas filtras apačioje ()

Diapazonas („A1“). Automatinio filtro laukas: = 3, 1 kriterijus: = „5“, operatorius: = xlBottom10Percent

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turime apibrėžti kriterijus, pagal kuriuos filtruojami apatinio x procento duomenys.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime tik 10 apatinių procentinių duomenų.

Kaip įdėti konkretaus teksto filtrą?

Norėdami suprasti, kaip įdėti filtrą konkrečiam, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei konkrečius duomenis norime matyti tik B stulpelyje, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomi specifiniai duomenys ()

Diapazonas ("A1"). Automatinio filtro laukas: = 2, 1 kriterijus: = "*" Exceltip "*"

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia mes pasirenkame duomenų diapazoną, kuriame lauko B stulpelį apibrėšime kaip 2, o tada nustatysime, kokius duomenis norime matyti.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, duomenys bus filtruojami ir matysime, kad bus rodomi tik „Exceltip“ duomenys.

Kaip nustatyti filtrą keliems kriterijams?

Norėdami suprasti, kaip konkrečiai įdėti filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti sausio ir kovo mėnesio duomenis, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomi keli duomenys ()

Diapazonas („A1: E1“). Automatinio filtro laukas: = 1, Kriterijai1: = „Sausis“, Operatorius: = xlAnd, Kriterijai2: = „Kovas“

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, kuriame A lauko stulpelį apibrėžsime kaip 1, o tada abu kriterijus.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime, kad bus rodomi tik sausio ir kovo mėnesio duomenys.

Kaip įdėti filtrą, kad būtų rodomi įrašai, kurių vertė yra tarp 2 verčių?

Norėdami suprasti, kaip nustatyti kelių kriterijų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime nustatyti filtrą pagal kriterijus, kiek skaičių turime po 5000–10 000 paspaudimų, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Sub MultipleCriteria ()

Diapazonas („A1: E1“). Automatinio filtro laukas: = 3, 1 kriterijus: = "> 5000", operatorius: = xlAnd, Criteria2: = "<10000"

Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti duomenų diapazoną, kuriame, naudodami operatoriaus funkciją, nustatysime kriterijus C stulpelyje.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, ir duomenys bus filtruojami, ir mes matysime duomenis pagal paspaudimus, kurie yra daugiau nei 5000 ir mažesni nei 10000.

Kaip įdėti kelių kriterijų filtrą į kelis stulpelius?

Norėdami suprasti, kaip filtruoti kelis kriterijus keliuose stulpeliuose, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelio puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime įdėti filtrą sausio mėnesį, kad pamatytume, kiek nuorodų yra „Excel“ patarimuose. Taigi turime įdėti filtrą į A ir B stulpelius, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomi keli laukai ()

Diapazonas („A1: E1“). Automatinio filtro laukas: = 1, 1 kriterijus: = „Jan“

Diapazonas („A1: E1“). Automatinio filtro laukas: = 2, 1 kriterijus: = "*" Exceltip "*"

Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turėsime 2 kartus apibrėžti kriterijus, kad pasiektume tikslą.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, ir duomenys bus filtruojami, o sausio mėnesio duomenyse matysime, kiek nuorodų priklauso „Exceltip“.

Kaip filtruoti duomenis netaikant filtro rodyklės?

Norėdami suprasti, kaip filtruoti duomenis netaikant filtro stulpelyje, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime įdėti filtrą sausio mėnesį ir paslėpti filtro rodyklę lauke, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Paslėptas filtras ()

Diapazonas („A1“). Automatinio filtro laukas: = 1, 1 kriterijus: = „Jan“, matomas sumažėjimas: = Netiesa

Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turime įsitikinti, kad filtras neturėtų būti matomas.

Norėdami paleisti makrokomandą, paspauskite klavišą F5 ir duomenys bus filtruojami. Dabar duomenis matome tik sausio mėnesio duomenyse, tačiau filtro rodyklė nebus rodoma mėnesio stulpelyje.

Kaip filtruoti duomenis, kad būtų rodomos 1 0r 2 galimos vertės?

Norėdami suprasti, kaip filtruoti duomenis, kad būtų rodomos 1 ar 2 galimos vertės, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime įdėti filtrą sausio mėnesį ir paslėpti filtro rodyklę lauke, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Paslėptas filtras ()

Diapazonas („A1“). Automatinio filtro laukas: = 1, 1 kriterijus: = „Jan“, matomas sumažėjimas: = Netiesa

Pabaiga Sub

Kodo paaiškinimas: - Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada įsitikinsime, kad filtras neturėtų būti matomas.

Norėdami paleisti makrokomandą, paspauskite klavišą F5 ir duomenys bus filtruojami. Dabar duomenis galime matyti sausio mėnesio ir vasario mėnesio duomenyse.

Kaip įdėti 10 geriausių prekių filtrą?

Norėdami suprasti, kaip įdėti 10 populiariausių elementų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti 10 populiariausių duomenų paspaudimų, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį ir paspauskite klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

10 papildomas filtras ()

Diapazonas („A1“). Automatinio filtro laukas: = 3, 1 kriterijus: = „10“, operatorius: = xlTop10Items

Pabaiga Sub

Kodo paaiškinimas- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, o tada turime apibrėžti kriterijus, pagal kuriuos filtruojami duomenys iš 10 geriausių elementų.

Norėdami paleisti makrokomandą, paspauskite klavišą F5, o duomenys bus filtruojami ir matysime tik 10 geriausių paspaudimų duomenų.

Kaip įdėti 10 procentų duomenų filtrą?

Norėdami suprasti, kaip įdėti 10 procentų duomenų filtrą, paimkime pavyzdį:-

Turime duomenų diapazone A1: E35, kuriame A stulpelyje yra mėnuo, B stulpelis Puslapis, C stulpelio paspaudimai, D stulpelio PR ir E stulpelyje yra vidutinė pozicija.

Jei norime matyti 10 procentų geriausių duomenų, turime atlikti toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Antrinis filtras: 10 procentų ()

Diapazonas („A1“). Automatinio filtro laukas: = 3, 1 kriterijus: = „10“, operatorius: = xlTop10Percent

Pabaiga Sub

Kodo paaiškinimas:- Pirmiausia turime pasirinkti duomenų diapazoną, į kurį norime įdėti filtrą, ir tada turime apibrėžti kriterijus, pagal kuriuos filtruojami duomenys iš 10 procentų.

Norėdami paleisti makrokomandą, paspauskite klavišą F5 ir duomenys bus filtruojami. Dabar matome tik 10 procentų geriausių duomenų.

Kaip pašalinti filtrą?

Norėdami suprasti, kaip pašalinti filtrą, atlikite toliau nurodytus veiksmus:-

  • Atidarykite VBA puslapį paspausdami klavišą Alt+F11.
  • Įdėkite modulį.
  • Parašykite žemiau nurodytą kodą:

Papildomas filtras ()

Darbo lapai („Sheet1“). ShowAllData

Pabaiga Sub

Norėdami paleisti makrokomandą, paspauskite klavišą F5, visi duomenys bus rodomi, tačiau filtro rodyklė nebus pašalinta.

Tai viskas apie tai, kaip mes galime įdėti filtrus per VBA „Microsoft Excel“.