Excel VBA: Kumaha Nyaring sareng Sababaraha Kriteria dina Array (7 Cara)

  • Bagikeun Ieu
Hugh West

Upami anjeun milari cara nyaring sareng sababaraha kritéria Asép Sunandar Sunarya dina Excel VBA , teras anjeun dina tempat anu leres. Nyaring set data badag dumasar kana sababaraha kritéria bisa jadi leuwih gampang kalayan bantuan VBA kode tinimbang ngagunakeun fitur konvensional Excel.

Jadi, hayu urang mimitian artikel utama urang.

Unduh Workbook

Saring sareng Sababaraha Kriteria.xlsm

7 Cara Nyaring sareng Sababaraha Kriteria dina Array Ngagunakeun Excel VBA

Dina set data di handap ieu, urang gaduh sababaraha catetan tanda anu cocog sareng nami murid sareng idna. Kami bakal nyobian nyaring set data ieu dumasar kana kriteria anu béda-béda salaku hiji array ku ngagunakeun sababaraha kode.

Kami parantos nganggo versi Microsoft Excel 365 di dieu, anjeun tiasa nganggo vérsi anu sanés numutkeun kasaéan anjeun.

Métode-1: Nyaring sareng Sababaraha Kriteria salaku Téks dina Array

Di dieu, urang bakal nyobian nyaring set data ieu dumasar kana Ngaran Murid kolom pikeun sababaraha kritéria ngandung string Emily , Daniel , jeung Gabriel dina array.

Lengkah-01 :

➤ Pindah ka Pamekar Tab >> Visual Basic Pilihan.

Teras, Visual Basic Editor bakal muka.

➤ Pindah ka Selapkeun Tab >> Modul Pilihan.

Sanggeus éta, hiji Modul bakaldijieun.

Lengkah-02 :

➤ Tulis kodeu ieu

6137

Di dieu, kami nyatakeun ngaran lulugu dina rentang B3:D3 dimana urang bakal nerapkeun saringan jeung Lapang:=2 mangrupa nomer kolom rentang ieu dumasar kana nu urang bakal ngalakukeun prosés nyaring ieu.

Ahirna, urang geus netepkeun kritéria salaku susunan pikeun ngadéklarasikeun sababaraha ngaran siswa saperti Emily , Daniel , jeung Jibril .

➤ Pencét F5 .

Lajeng, anjeun Dataset bakal disaring pikeun sababaraha kritéria pikeun nunjukkeun nami murid sareng ID sareng Mark pikeun murid Emily , Daniel , jeung Gabriel .

Baca Deui: Saring Sababaraha Kriteria dina Excel (4 Cara anu Cocog)

Métode-2: Nyaring sareng Kriteria Sababaraha Nomer dina Array Ngagunakeun Excel VBA

Di dieu, urang bakal nyaring set data di handap ieu pikeun id 101135 , 10 1137 , jeung 101138 ku cara ngagunakeun angka-angka ieu salaku sababaraha kritéria dina array.

Lengkah :

➤ Turutan Lengkah-01 tina Metoda-1 .

➤ Tulis kodeu ieu

7478

Di dieu, urang nyatakeun nami lulugu dina rentang B3: D3 dimana urang bakal nerapkeun saringan sareng Widang: = 2 mangrupikeun nomer kolom tina rentang ieu dumasar kana anu kami bakal ngalakukeun nyaring ieuprosés.

Ahirna, urang geus netepkeun kritéria salaku susunan pikeun ngadéklarasikeun sababaraha id siswa saperti 101135 , 101137 , jeung 101138 sarta kami geus nempatkeun eta di jero koma inverted pikeun nangtukeun eta jadi string sabab AutoFilter bakal dianggo ngan pikeun array of string.

➤ Pencét F5 .

Sanggeus éta, anjeun bakal meunang ngaran jeung tanda murid nu boga id 101135 , 101137 , jeung 101138 .

Maca deui: VBA Pikeun Kéngingkeun Nilai Unik tina Kolom kana Array dina Excel (3 Kriteria)

Métode-3: Nyetel Sababaraha Kriteria dina Range pikeun Ngagunakeun salaku Array

Di dieu, kami geus daptar kriteria dina Daptar kolom nu ngandung id 101134 , 101135 , jeung 101136 dumasar kana mana urang bakal ngalakukeun prosés nyaring.

Lengkah-léngkah :

➤ Turutan Lengkah-01 tina Metoda-1 .

➤ Tulis kodeu ieu

3140

Di dieu , urang geus decl ared ID_range , k salaku Variant jeung ID_range nyaéta array nu bakal nyimpen sababaraha kriteria, jeung k nyaéta increment mimitian ti wates handap ka wates luhur Asép Sunandar Sunarya ieu. Pikeun miboga wates handap jeung wates luhur, kami ngagunakeun fungsi LBOUND jeung fungsi UBOUND masing-masing.

FOR loop dipaké pikeun ngarobah nilai lian ti stringdina Asép Sunandar Sunarya kana string kalayan bantuan fungsi CStr . Tungtungna, kami geus ngagunakeun array ieu salaku Kriteria1 .

➤ Pencét F5 .

Sanggeus, anjeun bakal meunang ngaran jeung tanda murid nu boga id 101134 , 101135 , jeung 101136 .

Baca Deui: Saring Kolom Béda ku Sababaraha Kriteria dina Excel VBA

Bacaan Sarupa

  • Kumaha Nyaring Nilai Unik dina Excel (8 Cara Gampang)
  • Lakukeun Saringan Custom dina Excel (5 Cara)
  • Itung Rata-rata Array nganggo VBA (Makro, UDF, sareng UserForm)
  • Potong kompas pikeun Filter Excel (3 Pamakéan Gancang kalayan Conto)

Métode-4: Ngagunakeun Fungsi SPLIT sareng JOIN pikeun Nyiptakeun Array sareng Sababaraha Kriteria

Di dieu, urang bakal ngagunakeun daptar di handap ieu dina daptar kolom sabagé Asép Sunandar Sunarya jeung pikeun nyaring susunan data nu bener urang ogé bakal ngagunakeun fungsi SPLIT , fungsi JOIN , jeung fungsi TRANSPOSE dina Kode VBA .

Lengkah :

➤ Fol low Lengkah-01 tina Metoda-1 .

➤ Tulis kodeu ieu

4944

Di dieu, TRANSPOSE bakal ngarobah 2D array kana 1D array disebutkeun AutoFilter moal jalan, GABUNG bakal ngagabung unggal nilai kana susunan string, sarta tungtungna, SPLIT bakal ngarecah unggal string pikeun masihan inputkapisah salaku kritéria pikeun nyaring set data.

➤ Pencét F5 .

Ahirna, anjeun bakal nampi nami sareng tanda tina siswa nu boga id 101134 , 101135 , jeung 101136 .

Baca Selengkapnya: Kumaha Ngabagi String kana Array dina VBA (3 Cara)

Metode-5 : Filter sareng Sababaraha Kriteria dina Loop pikeun Array sareng VBA

Dina bagian ieu, urang bakal nyaring set data di handap gumantung kana ID Siswa kolom pikeun sababaraha kritéria sakumaha didaptarkeun dina Daptar kolom.

Lengkah :

➤ Turutan Lengkah- 01 tina Metode-1 .

➤ Tulis kodeu handap

6846

Di dieu, kami geus nyatakeun k salaku Integer , ID_range(100) salaku String dimana ID_range nyaéta array anu bakal nyimpen nepi ka 100 nilai. Pikeun nangtukeun nilai-nilai pikeun Asép Sunandar Sunarya ieu kami geus dipaké FOR loop pikeun k ti 4 nepi ka 6 salaku nomer baris Daptar kolom jeung F nyaéta ngaran kolom.

Ahirna, kami geus ngagunakeun array ieu salaku Kriteria1 pikeun Filter Otomatis .

➤ Pencét F5 .

Antukna, anjeun bakal meunang ngaran jeung tanda murid nu boga id 101134 , 101135 , jeung 101136 .

Baca deui: Saring Sababaraha Kriteria dina Excel nganggo VBA (Boh AND sareng ORJenis)

Métode-6: Ngagunakeun Rentang Named pikeun Kritéria Sababaraha

Di dieu, kami geus daptar sababaraha ngaran siswa dina Daptar kolom sarta ngaranna ieu rentang salaku Murid . Ngagunakeun rentang ngaranna ieu urang bakal nangtukeun hiji array nu bakal ngandung sababaraha kriteria keur AutoFilter fitur.

Lengkah :

➤ Turutan Lengkah-01 tina Metoda-1 .

➤ Tulis kodeu ieu

1925

Di dieu, kami geus nyatakeun Student_range , k sabagé Variant , sarta ngagunakeun TRANSPOSE function pikeun ngarobah 2D array tina rentang ngaranna. Student kana 1D array teras disimpen dina Student_range . Saterusna, éta dipaké salaku Kriteria1 pikeun métode Filter Otomatis .

➤ Pencét F5 .

Salajengna, anjeun bakal ngagaduhan set data anu disaring pikeun sababaraha kritéria pikeun nunjukkeun nami murid sareng ID sareng Mark pikeun murid Jefferson , Emily , jeung Sara .

Eusi Patali: VBA kana Transpose Array dina Excel (3 Métode)

Métode-7: Méja Filter sareng Sababaraha Kriteria dina Array

Di dieu, urang gaduh Table anu namina Table1 sareng nganggo Excel VBA urang coba nyaring tabél ieu dumasar kana ngaran Emily , Daniel , jeung Gabriel salaku sababaraha kriteria dina hiji array.

Lengkah :

➤ Turutan Lengkah-01 tina Métode-1 .

➤ Tulis kodeu ieu

5249

Di dieu, ListObjects("Table1") dipaké pikeun nangtukeun tabel Table1 , Field:=2 pikeun nyetel kolom kadua rentang ieu salaku dasar tina prosés nyaring sarta tungtungna urang geus nangtukeun hiji Asép Sunandar Sunarya. ngandung sababaraha ngaran pikeun Kriteria1 .

➤ Pencét F5 .

Antukna, anjeun bakal boga set data disaring pikeun sababaraha kritéria pikeun nunjukkeun nami murid sareng Id sareng Mark pikeun murid Emily , Daniel , jeung Gabriel .

Baca deui: Excel VBA: Méja Saringan Dumasar Nilai Sél (6 Métode Gampang)

Bagian Praktek

Pikeun ngalakukeun latihan ku sorangan kami geus disadiakeun a Praktek bagian kawas handap dina lambar ngaranna Praktek . Punten laksanakeun ku nyalira.

Kacindekan

Dina artikel ieu, urang nyobian nutupan cara-cara nyaring ku sababaraha kritéria salaku arrays nganggo Excel VBA gampil. Miharep anjeun bakal manggihan eta mangpaat. Upami anjeun gaduh saran atanapi patarosan, mangga bagikeun dina bagian koméntar.

Hugh West mangrupikeun palatih sareng analis Excel anu ngalaman langkung ti 10 taun pangalaman di industri. Anjeunna nyepeng gelar Sarjana Akuntansi sareng Keuangan sareng gelar Master dina Administrasi Bisnis. Hugh gaduh gairah pikeun ngajar sareng parantos ngembangkeun pendekatan pangajaran anu unik anu gampang diturutan sareng kahartos. Pangaweruh ahli ngeunaan Excel parantos ngabantosan rébuan mahasiswa sareng profésional di sakumna dunya ningkatkeun kaahlian sareng unggul dina karirna. Ngaliwatan blogna, Hugh ngabagi pangaweruhna ka dunya, nawiskeun tutorial Excel gratis sareng pelatihan online pikeun ngabantosan individu sareng usaha ngahontal poténsi pinuh.