VBA կոդ Excel-ում տվյալները զտելու համար (8 օրինակ)

  • Կիսվել Սա
Hugh West

Excel Տեսակավորել & Զտիչ հրամանը ունի սահմանափակ տիրույթ մինչև Զտել տվյալները : Բայց օգտագործելով VBA դուք կարող եք Զտել տվյալները լայն տիրույթում, ինչպես ցանկանում եք: Այս հոդվածը ձեզ կտրամադրի 8 օգտակար օրինակ՝ VBA կոդն օգտագործելու համար Զտել տվյալները excel-ում՝ օգտագործելով VBA կոդերը վառ նկարազարդումներով:

Ներբեռնեք Practice Workbook

Դուք կարող եք ներբեռնել Excel-ի անվճար ձևանմուշն այստեղից և ինքնուրույն վարժվել:

VBA Code Filter Data.xlsm

8 Օրինակներ Excel-ում տվյալների զտման համար VBA կոդը օգտագործելու համար

Նախ եկեք ծանոթանանք մեր տվյալների հավաքածուին, որը ներկայացնում է որոշ ուսանողների սեռը, կարգավիճակը և Տարիքը .

1. Excel-ում տեքստային չափանիշների հիման վրա տվյալները զտելու համար օգտագործեք VBA կոդը

Մեր առաջին օրինակում մենք կօգտագործենք VBA Զտել միայն Տղա ուսանողներ տվյալների հավաքածուի Սեռ սյունակից:

Քայլեր.

  • Աջ սեղմեք թերթի վերնագրում :
  • Այնուհետև Ընտրեք Դիտել կոդը Համատեքստային ընտրացանկից :

Շուտով հետո VBA պատուհան կբացվի:

  • Մուտքագրեք հետևյալ կոդերը մեջ it-
4793
  • Հետագայում նվազագույնի հասցրեք VBA

Code Breakdown

  • Այստեղ ես ստեղծեցի Sub ընթացակարգը, Filter_Data_Text() :
  • Այնուհետև օգտագործեցի Range հատկությունը՝ մեր համապատասխան թերթի անունը հայտարարելու համար և միջակայք
  • Այնուհետև ես օգտագործեցի Ավտոֆիլտրի մեթոդը , որպեսզի օգտագործեմ իմ ընտրած Չափանիշները , որտեղ Field:=2 նշանակում է սյունակ 2 : Եվ Criteria1:=”Male” Զտելու տվյալները Տղամարդու համար:
  • Դրանից հետո բացեք Մակրոների երկխոսության տուփը , սեղմեք այսպես. Մշակավոր > Մակրոներ:

  • Ընտրեք Մակրո անունը ինչպես նշված է կոդերում .
  • Վերջապես, պարզապես սեղմեք Run :

Այժմ տեսեք, որ մենք ունենք միայն Արական սեռի աշակերտների տվյալները Զտումից հետո:

Կարդալ ավելին. Excel Filter Data-ի հիման վրա Բջջի արժեքը (6 արդյունավետ եղանակ)

2. Կիրառեք VBA կոդը՝ մեկ սյունակում բազմաթիվ չափանիշներով տվյալները զտելու համար

Այստեղ մենք Զտենք մի քանի չափանիշների համար մեկ սյունակում: Տվյալների հավաքածուի երրորդ սյունակից մենք Զտելու ենք Ավագավարտների և Ասպիրանտների ուսանողների համար:

Քայլեր.

  • Հետևեք առաջին օրինակի առաջին երկու քայլերին VBA պատուհանը բացելու համար:
  • Ավելի ուշ, մուտքագրեք հետևյալ կոդերը դրա մեջ-
4395
  • Այնուհետև նվազագույնի հասցրեք VBA

Code Breakdown

  • Այստեղ ես ստեղծել եմ Sub ընթացակարգ, Filter_One_Column() ։
  • Այնուհետև օգտագործեց Range հատկությունը՝ մեր համապատասխան թերթի անունը և տիրույթը
  • հայտարարելու համար։ Հաջորդը ես օգտագործեցի theAutoFilter մեթոդ ՝ օգտագործելու իմ ընտրած Չափանիշները , որտեղ Field:=3 նշանակում է սյունակ 3 : Այստեղ, Չափանիշ 1:=«Ավարտել» և Չափանիշ 2:=«Աստծո» զտելու ուսանողի կարգավիճակը :
  • Վերջապես, ես օգտագործեցի Operator:=xlOr ` կիրառելու OR պայման Զտիչ բազմաթիվ չափանիշների համար:
  • Այս պահին պահին, հետևեք երրորդ քայլին առաջին օրինակից ՝ բացելու Մակրոների երկխոսության վանդակը :
  • Հետագայում, ընտրեք նշված Մակրո անունը և սեղմեք Run :

Շուտով դուք կստանաք զտված տողեր՝ հիմնված բազմաթիվ չափանիշների վրա, ինչպիսին է ստորև նկարը:

Կարդալ ավելին. Զտել բազմաթիվ չափանիշներ Excel-ում (4 հարմար եղանակ)

3. Կիրառեք VBA կոդը Excel-ի տարբեր սյունակներում բազմակի չափանիշներով տվյալների զտման համար

Այժմ մենք Զտելու ենք բազմաթիվ չափանիշների համար- Տղամարդ և Ավարտել ուսանողներ:

Քայլեր.

  • Հետևեք առաջին օրինակի առաջին երկու քայլերին մինչև բացեք VBA
  • Այնուհետև, գրեք հետևյալ կոդերը դրա մեջ-
3692
  • Հետո որ նվազագույնի հասցնի VBA պատուհանը ։

Կոդի բացահայտում

  • Այստեղ ես ստեղծեցի Sub ընթացակարգ, Filter_Different_Columns() :
  • Այնուհետև օգտագործեցի With հայտարարությունը <1 օգտագործելու համար:>Բազմաթիվ սյունակ :
  • Այնուհետև օգտագործվեց Range հատկություն՝ մեր համապատասխան թերթի անվանումը և տիրույթը
  • Հետո, ես օգտագործել եմ Ավտոֆիլտրի մեթոդը ՝ օգտագործելու չափանիշները իմ ընտրությունը, որտեղ Field:=2 նշանակում է սյունակ 2 և Field:=3 նշանակում է սյունակ 3 :
  • Այստեղ , ընտրվել է Չափանիշ1:=”Տղամարդ” Սեռ սյունակում և Չափանիշ1:=”Ավարտել” Կարգավիճակ սյունակում Զտիչ տվյալներ տարբեր սյունակներից :
  • Այնուհետև հետևեք երրորդ քայլին առաջին օրինակից բացելու համար Մակրոների երկխոսության տուփ :
  • Այնուհետև ընտրեք նշված Մակրո անունը և սեղմեք Run :

Ահա մի քանի չափանիշների արդյունքը:

Կարդալ ավելին` Excel VBA զտել նույն սյունակում՝ ըստ բազմաթիվ չափանիշների (6 օրինակ)

4. Օգտագործեք VBA կոդը Excel-ի լավագույն 3 տարրերը զտելու համար

Այս օրինակում մենք կզտենք առաջին երեք ուսանողներին ըստ նրանց տարիքի :

Քայլեր.

  • Հետևեք առաջին օրինակի առաջին երկու քայլերին ՝ բացելու VBA պատուհանը .
  • Այնուհետև մուտքագրեք հետևյալ կոդերը դրա մեջ-
6878
  • Դրանից հետո նվազագույնի հասցրեք VBA պատուհան .

Կոդի բաշխում

  • Ահա, ես ստեղծեց Ենթակարգ ընթացակարգ, Filter_Top3_Items() :
  • Եվ այնուհետև օգտագործեց Operator:=xlTop10Items դեպի Filter լավագույն եռյակը տվյալներ ։
  • Այժմ հետևեք երրորդ քայլին առաջին օրինակից ՝ բացելու համար Մակրոների երկխոսություն արկղ ։
  • Այնուհետև ընտրեք մակրոյի անունը ինչպես նշված է կոդերում և սեղմեք Run ։

Այնուհետև դուք կստանաք ելք, ինչպես ստորև ներկայացված պատկերը-

Կարդալ ավելին. Ինչպես զտել բջջային արժեքի հիման վրա՝ օգտագործելով Excel VBA (4 մեթոդներ)

Նման ընթերցումներ

  • Ինչպես պատճենել և տեղադրել, երբ Զտիչը կիրառվում է Excel-ում
  • Ինչպես զտել եզակի արժեքները Excel-ում (8 հեշտ եղանակ)
  • Զտել բազմաթիվ չափանիշներ Excel-ում VBA-ով (երկուսն էլ AND and OR Types)
  • Ինչպես օգտագործել տեքստային զտիչը Excel-ում (5 օրինակ)
  • Ինչպես զտել ըստ ամսաթվի Excel-ում (4 Արագ Մեթոդներ)

5. Օգտագործեք VBA կոդը Excel-ում լավագույն 50 տոկոսը զտելու համար

Եկեք օգտագործենք VBA կոդերը՝ զտելու ուսանողների լավագույն հիսուն տոկոսը ըստ իրենց տարիքի: .

Քայլեր.

  • Նախ, Հետևեք առաջին օրինակի առաջին երկու քայլերին VBA պատուհանը բացելու համար :
  • Այնուհետև մուտքագրեք հետևյալ կոդերը դրա մեջ-
2995
  • Նվազագույնի հասցրեք VBA պատուհանը :

Կոդերի բաշխում

  • Այստեղ ես ստեղծեցի Ենթակարգ ընթացակարգը, Filter_Top50_Percent() ։
  • Հետագայում օգտագործվեց Operator:=xlTop10Percent մինչև Զտել վերևի հիսուն տոկոսը սյունակ-4 :
  • Այս պահին հետևեք երրորդ քայլին առաջին օրինակից ` բացելու համար Մակրո երկխոսության տուփ:
  • Այնուհետև ընտրեք նշված Մակրո անունը և սեղմեք Run :

Ընդամենը 7 ուսանող է եղել ուստի 50 տոկոսի համար , այն ցույց է տալիս մոտավորապես երեք ուսանող :

Կարդալ ավելին. Ինչպես օգտագործել շահույթի տոկոսային բանաձևը Excel-ում (3 օրինակ)

6 . Կիրառել VBA կոդը տվյալների զտման համար՝ օգտագործելով Wildcard

Մենք կարող ենք օգտագործել Wildcard նիշերը-* (աստղանիշ) VBA կոդերում Excel-ում տվյալները զտելու համար: Կարգավիճակի սյունակից մենք կզտենք միայն արժեքները, որոնք պարունակում են «Փոստ» :

Քայլեր.

  • Հետևեք առաջին օրինակի առաջին երկու քայլերին VBA պատուհանը բացելու համար:
  • Այնուհետև գրեք հետևյալ կոդերը դրանում-
1459
  • Հետագայում նվազագույնի հասցրեք VBA պատուհանը ։

Code Breakdown

  • Այստեղ ես ստեղծել եմ Sub ընթացակարգ, Filter_with_Wildcard() .
  • Այնուհետև օգտագործվեց Range (“B4”) միջակայքը սահմանելու համար:
  • Հաջորդ , օգտագործված AutoFilter to Filter in Field:=3 նշանակում է սյունակ 3:
  • Criteria1:=”*Գրառում *” Զտելու արժեքները, որոնք պարունակում են “Post”:
  • Այժմ հետևեք երրորդ քայլին առաջինը -ից օրինակ ՝ Մակրոների երկխոսությունը բացելու համարվանդակում:
  • Ընտրեք նշված Մակրո անունը և սեղմեք Run :

Այնուհետև դուք կստանաք ցանկալի արդյունքը:

Կարդալ ավելին. Ինչպես ավելացնել զտիչ Excel-ում (4 մեթոդ )

7. Տեղադրեք Excel VBA-ն Excel-ում զտված տվյալները նոր թերթում պատճենելու համար

Տեսեք, որ իմ տվյալների բազայում կան որոշ զտված տվյալներ: Այժմ ես դրանք կպատճենեմ նոր թերթում՝ օգտագործելով VBA : Այս կոդերը ճիշտ չեն աշխատի թերթիկում, դուք պետք է կիրառեք դրանք մոդուլում:

Քայլեր.

  • Սեղմեք Alt+F11 ՝ բացելու համար VBA

  • Այնուհետև սեղմեք Տեղադրել > Մոդուլ ՝ մոդուլ բացելու համար :

  • Այժմ գրեք հետևյալ կոդերը
1561
  • Այնուհետև նվազագույնի հասցրեք VBA

Code Breakdown

  • Այստեղ ես ստեղծել եմ Sub ընթացակարգ, Copy_Filtered_Data_NewSheet() :
  • Դրանից հետո հայտարարված է երկու փոփոխական- x Rng Որպես տիրույթ և xWS որպես աշխատանքային թերթ:
  • Այնուհետև օգտագործվեց IF հայտարարությունը ստուգեք Զտված է
  • Այնուհետև օգտագործվեց MsgBox արդյունքը ցույց տալու համար:
  • Այնուհետև օգտագործվեց Աշխատանքային թերթիկները («Պատճենել զտված տվյալները»): AutoFilter .Range ընտրել Զտված միջակայքը և օգտագործել Ավելացնել նոր թերթ ավելացնելու համար:
  • Վերջապես, Copy Range(“G4”) Զտված տվյալները պատճենելու է նոր թերթում :
  • Այնուհետև հետևեքերրորդ քայլը առաջին օրինակից ՝ բացելու Մակրոների երկխոսության տուփը :
  • Այնուհետև ընտրեք նշված Մակրո անունը և սեղմեք Run :

Այժմ տեսեք, որ Excel-ը բացել է նոր թերթ և պատճենել զտված տողերը:

Կարդալ ավելին. Դյուրանցում Excel ֆիլտրի համար (3 արագ օգտագործում օրինակներով)

8. Կիրառեք VBA կոդը տվյալների զտման համար՝ օգտագործելով բացվող ցուցակը

Մեր վերջին օրինակում մենք նախ կկազմենք բացվող ցուցակ սեռերի համար, այնուհետև այն կօգտագործենք տվյալները զտելու համար: Դրա համար ես տեղադրել եմ գենդերային չափանիշները մեկ այլ վայրում, և մենք բացվող ցուցակ կկազմենք Cell D14 -ում:

Քայլեր.

  • Ընտրեք Բջջ D14 :
  • Այնուհետև սեղմեք հետևյալ կերպ. Տվյալներ > Տվյալների գործիքներ > Տվյալների վավերացում > Տվյալների վավերացում:

Շուտով կբացվի երկխոսության տուփ :

Ընտրեք Ցուցակ Թույլատրել բացվող ցանկից :

Այնուհետև սեղմեք Բաց պատկերակը Աղբյուր վանդակից :

Այժմ ընտրեք չափանիշների տիրույթը և սեղմեք Enter կոճակը :

  • Այս պահին պարզապես սեղմեք OK :

Այժմ մեր բացվող ցանկը պատրաստ է:

  • Այժմ Հետևեք առաջին օրինակի առաջին երկու քայլերին VBA պատուհանը բացելու համար .
  • Այնուհետև գրեք հետևյալ կոդերը դրա մեջ-
3320
  • Այնուհետև նվազագույնի հասցրեք VBA-նպատուհան .

Code Breakdown

  • Այստեղ ես ստեղծել եմ a Մասնավոր ենթաօրենսդրական ընթացակարգ, Աշխատանքային_Փոփոխություն (ByVal Target As Range):
  • Այնուհետև ես ընտրեցի Աշխատանքային թերթիկ Ընդհանուր և Փոխել Հայտարարություններից :
  • Այնուհետև տեղադրեք Հասցեն որոշելու համար:
  • Վերջապես IF հայտարարության մեջ օգտագործվեց AutoFilter մեթոդը Field <2-ով>և Չափանիշներ
  • Այժմ պարզապես ընտրեք չափանիշները բացվող ցանկից և Զտիչը կակտիվանա :

Ահա Զտված ելքը Տղամարդ բացվող -ից ընտրելուց հետո։

Կարդալ ավելին. Ինչպես զտել ըստ ցանկի մեկ այլ թերթիկի Excel-ում (2 մեթոդ)

Գործնական բաժին

Դուք կստանաք պրակտիկայի թերթիկ վերը տրված Excel ֆայլում՝ բացատրված ուղիները կիրառելու համար:

Եզրակացություն

Հուսով եմ, որ վերը նկարագրված ընթացակարգերը բավականաչափ լավ կլինեն՝ excel-ում VBA կոդը Զտելու տվյալները օգտագործելու համար: Ազատորեն ցանկացած հարց տվեք մեկնաբանությունների բաժնում և խնդրում եմ ինձ կարծիք հայտնել:

Հյու Ուեսթը բարձր փորձառու Excel-ի մարզիչ և վերլուծաբան է, որն ունի ավելի քան 10 տարվա փորձ այս ոլորտում: Նա հաշվապահական հաշվառման և ֆինանսների բակալավրի և բիզնեսի կառավարման մագիստրոսի կոչում է ստացել: Հյուը կիրք ունի դասավանդելու նկատմամբ և մշակել է ուսուցման յուրահատուկ մոտեցում, որը հեշտ է հետևել և հասկանալ: Excel-ի նրա փորձագիտական ​​գիտելիքներն օգնել են հազարավոր ուսանողների և մասնագետների ամբողջ աշխարհում բարելավել իրենց հմտությունները և առաջադիմել իրենց կարիերայում: Իր բլոգի միջոցով Հյուն կիսվում է իր գիտելիքներով աշխարհի հետ՝ առաջարկելով Excel-ի անվճար ձեռնարկներ և առցանց ուսուցում, որոնք կօգնեն անհատներին և ձեռնարկություններին հասնել իրենց ողջ ներուժին: