Excel VBA. Եթե բջիջը պարունակում է արժեք, ապա վերադարձրեք նշված արդյունքը

  • Կիսվել Սա
Hugh West

Այս հոդվածում ես ձեզ ցույց կտամ, թե ինչպես կարող եք վերլուծել իրավիճակը Excel-ում VBA եթե բջիջը արժեք է պարունակում: Դուք կսովորեք վերլուծել իրավիճակը ինչպես ցանկացած արժեքի, այնպես էլ որոշակի արժեքի համար:

Excel VBA վերլուծություն. Եթե բջիջը պարունակում է արժեք, ապա (Արագ դիտում)

8403

Ներբեռնեք գործնական աշխատանքային գիրքը

Ներբեռնեք այս պրակտիկայի աշխատանքային գրքույկը՝ այս հոդվածը կարդալու ընթացքում մարզվելու համար:

VBA If Cell Contains Value then.xlsm

Excel VBA վերլուծություն. Եթե բջիջը պարունակում է արժեք, ապա վերադարձրեք արդյունքները (քայլ առ քայլ վերլուծություն)

Այստեղ մենք ունենք տվյալների հավաքածու Ֆիզիկայի, Քիմիայի որոշ ուսանողների գնահատականներով, և Մաթեմատիկա դպրոցում, որը կոչվում է «Արևածաղկի մանկապարտեզ»:

Դատարկ բջիջները նշանակում են, որ աշակերտը չի ներկայացել, այսինքն՝ բացակայել է տվյալ քննությունից: Հիմա եկեք վերլուծենք իրավիճակը՝ արդյոք բջիջը պարունակում է արժեք, թե ոչ, այս տվյալների հավաքածուով:

⧪ Քայլ 1. Բջջի հայտարարում

Նախ, մենք պետք է հայտարարում ենք այն բջիջը, որի արժեքը ցանկանում ենք վերլուծել: Եկեք վերլուծենք՝ Ջենիֆեր Մարլոն հայտնվե՞լ է ֆիզիկայի քննությանը, թե՞ ոչ։

Այդ պատճառով մենք պետք է ստուգենք՝ C12 բջիջը արժեք է պարունակում, թե ոչ։

Դա անելու համար. Նախ, մենք պետք է հայտարարենք C12 բջիջը:

Կոդերի տողը, որն իրականացնելու համար դա կլինի.

7369

⧪ Քայլ 2. Ստուգել, ​​թե արդյոք բջիջը պարունակում է a Արժեք (ներառյալ հատուկ արժեքը)

Այնուհետև մենք պետք է ստուգենք՝ արդյոքբջիջը պարունակում է արժեք, թե ոչ: Մենք դա կկատարենք՝ օգտագործելով Եթե պայմանը : Կոդի տողը կլինի՝

9187

Այս կոդը կկատարվի, եթե բջիջը պարունակում է որևէ արժեք: Արժեքը ստուգելու համար (օրինակ՝ այն պարունակում է 100, թե ոչ), օգտագործեք այդ հատուկ արժեքը Հավասար է նշանով:

7677

⧪ Քայլ 3. Առաջադրանքի բաշխում

Այնուհետև դուք պետք է ստեղծեք առաջադրանք, որը կկատարվի, եթե բջիջը պարունակում է արժեք (կամ որոշակի արժեք):

Այստեղ մենք ցանկանում ենք ցուցադրել հաղորդագրությունը: «Ջենիֆեր Մարլոն հայտնվեց ֆիզիկայի քննությանը»: : Այսպիսով, կոդի տողը կլինի.

8969

⧪ Քայլ 4. Ավարտելով If Block-ը

Վերջապես, դուք պետք է հայտարարեք If բլոկի ավարտը:

9927

Այսպիսով, ամբողջական VBA կոդը կլինի՝

⧭ VBA կոդը՝

3524

⧭ Արդյունք.

Գործարկեք այս կոդը՝ սեղմելով Run Sub/UserForm կոճակը գործիքագոտում:

Այն կցուցադրի հաղորդագրություն «Ջենիֆեր Մարլոն հայտնվեց ֆիզիկայի քննությանը»: քանի որ C12 բջիջը պարունակում է 50 արժեք:

Օրինակներ, որոնք ներառում են, եթե բջիջը պարունակում է արժեք, ապա նշված ելք Excel VBA-ով

Մենք սովորել ենք վերլուծել, արդյոք բջիջը պարունակում է արժեք կամ ոչ VBA -ում: Այժմ եկեք ուսումնասիրենք մի քանի օրինակներ՝ հասկանալի դարձնելու համար:

1. Մակրո մշակում՝ արժեքը զտելու համար, եթե համապատասխան բջիջը պարունակում է որևէ արժեք, ապա Excel VBA-ում

Եկեք մշակենք Մակրո ՝ յուրաքանչյուր քննության ժամանակ հայտնված ուսանողներին զտելու համար։

Այսինքն՝ մենք պետք է ստուգենք առարկաներից յուրաքանչյուրի նշանները պարունակող բջիջները և տեսնենք՝ արդյոք դրանք արժեք են պարունակում։ թե ոչ:

Եթե նրանք անեն, ապա մենք պետք է դասավորենք համապատասխան ուսանողի անունը:

Ամբողջական VBA ծածկագիրը, որն անելու է դա, կլինի.

⧭ VBA կոդ՝

2964

⧭ Արդյունք՝

Ընտրեք տվյալների հավաքածու ( Ներառելով Վերնագրերը ) և գործարկեք այս Մակրո :

Նախ, ձեզանից կպահանջվի մուտքագրել առաջինի հղումը բջիջը, որտեղ ցանկանում եք զտված տվյալները: Ես մուտքագրել եմ G3 :

Այնուհետև սեղմեք OK : Դուք կստանաք այն ուսանողների անունները, ովքեր հայտնվել են քննություններից յուրաքանչյուրում (ներառյալ Վերագրերը ) տվյալների նոր հավաքածուում՝ սկսած G3 բջիջից:

2. Օգտագործողի կողմից սահմանված ֆունկցիայի ստեղծում՝ արժեքը տեսակավորելու համար, եթե համապատասխան բջիջը պարունակում է հատուկ արժեք, ապա Excel VBA-ում

Այժմ մենք կստեղծենք օգտվողի կողմից սահմանված ֆունկցիա, որը կվերադարձնի ուսանողների անունները: ովքեր առարկաներից յուրաքանչյուրում ստացել են կոնկրետ գնահատական:

Ընթացակարգը գրեթե նույնն է, ինչ վերը նշվածը: Մենք պետք է ստուգենք առարկաներից յուրաքանչյուրի նշանները պարունակող բջիջները և տեսնենք, արդյոք դրանք հավասար են որոշակի արժեքի, թե ոչ:

Եթե դրանք լինեն, ապա մենք կվերադարձնենք համապատասխան ուսանողի անունը:

VBA կոդը կլինի՝

⧭ VBAԿոդ՝

3345

⧭ Արդյունք.

Կոդը ստեղծում է գործառույթ, որը կոչվում է Cells_with_Values , որը վերցնում է երկու արգումենտ՝ Range և Value :

Եկեք պարզենք այն ուսանողներին, ովքեր այս ֆունկցիայի միջոցով ստացել են 100 յուրաքանչյուր առարկայից:

Ընտրեք մի շարք բջիջներ ձեր աշխատաթերթում և մուտքագրեք այս գործառույթը տիրույթի առաջին բջիջում՝

=Cells_with_Values(B3:E13,100)

[Այստեղ B3: E3 -ը իմ տվյալների հավաքածուն է (ներառյալ Վերագլուխները ) և 100 իմ համապատասխան արժեքն է: Դուք օգտագործում եք ձեր մեկը:]

Այնուհետև սեղմեք CTRL + SHIFT + ENTER ( Array Formula ): Այն կվերադարձնի մի զանգված, որը բաղկացած է յուրաքանչյուր առարկայից 100 ստացած ուսանողների անուններից, ներառյալ Վերագլուխները :

3: Օգտագործողի ձևի մշակում արժեք հանելու համար, եթե համապատասխան բջիջը պարունակում է որևէ արժեք (կամ հատուկ արժեք) Excel VBA-ում

Վերջապես, մենք կմշակենք UserForm ` հանելու համար ուսանողների անունները, ովքեր հայտնվել են (կամ ստացել են կոնկրետ գնահատականներ) որոշ կոնկրետ քննություններում:

⧪ Քայլ 1. Բացել UserForm

Գնալ դեպի Insert > UserForm տարբերակը VBA խմբագրում` նոր UserForm բացելու համար: Նոր UserForm , որը կոչվում է UserForm1 , կբացվի:

⧪ Քայլ 2. Քաշել գործիքները դեպի UserForm

Բացի UserForm -ից, դուք կստանաք Գործիքատուփ : Տեղափոխեք ձեր կուրսորը Գործիքների տուփի վրա և քաշեք 4 պիտակներ (Label1, Label2,Label3, Label4) և 3 ListBox (ListBox1, ListBox2, ListBox3) և TextBox (TextBox1) ուղղանկյուն ձևով UserForm -ի վրա:

Այնուհետև քաշեք մեկ այլ Պիտակ (Label5) և TextBox (TextBox2) UserForm -ի ներքևի ձախ անկյունում:

Վերջապես, քաշեք CommandButton (CommandButton1) ներքևի աջ անկյուն:

Փոխեք Labels -ի էկրանները Որոնման սյունակ , Վերադարձի սյունակ , Ցանկացած արժեք կամ կոնկրետ արժեք , արժեք, և մեկնարկային բջիջ:

Նաև փոխեք CommandButton1 -ի ցուցադրումը OK :

⧪ Քայլ 3. Կոդ գրել ListBox3-ի համար

Կրկնակի սեղմեք ListBox3 -ի վրա: Կբացվի Մասնավոր ենթակարգ , որը կոչվում է ListBox3_Click : Այնտեղ մուտքագրեք հետևյալ կոդը:

2537

⧪ Քայլ 4. Կոդ գրել CommandButton1-ի համար

Այնուհետև կրկնակի սեղմեք CommandButton1-ի վրա . Մեկ այլ Մասնավոր ենթակարգ , որը կոչվում է CommandButton1_Click , կբացվի: Այնտեղ մուտքագրեք հետևյալ կոդը:

2781

⧪ Քայլ 5. Կոդ գրել UserForm-ը գործարկելու համար

Վերջապես, տեղադրեք նոր Մոդուլ <-ից 1>VBA գործիքագոտին և այնտեղ տեղադրեք հետևյալ կոդը:

9732

⧪ Քայլ 6. Գործարկել UserForm-ը (վերջնական ելքը)

Ձեր UserForm -ն այժմ պատրաստ է օգտագործման: Ընտրեք տվյալների հավաքածուն աշխատաթերթից ( B3:E13 այստեղ) (ներառյալ Վերնագրերը ) ևգործարկեք Մակրո , որը կոչվում է Run_UserForm :

UserForm -ը կբեռնվի աշխատաթերթում: Փնտրել սյունակ աղյուսակից ես ընտրել եմ Ֆիզիկա և Մաթեմատիկա , քանի որ ուզում եմ ստանալ ուսանողների անունները, ովքեր հայտնվել են Ֆիզիկա -ում: և Մաթեմատիկա քննություններ:

Վերադարձի սյունակ աղյուսակից ես ընտրել եմ Աշակերտի անունը , քանի որ ուզում եմ ստանալ ուսանողների անունները:

Եվ Ցանկացած արժեք կամ հատուկ արժեք աղյուսակից ես ընտրել եմ Ցանկացած արժեք :

Վերջապես, Մեկնարկային բջիջում տուփ, ես դրել եմ G3 :

Այնուհետև սեղմեք OK : Դուք կստանաք այն ուսանողների անունները, ովքեր մասնակցել են Ֆիզիկայի և Մաթեմատիկայի քննություններին` սկսած G3 բջիջից:

Եթե դուք ընտրեիք Հատուկ արժեք Ցանկացած արժեք կամ հատուկ արժեք աղյուսակից, դուք կունենայիք ևս մեկ TextBox ` կոնկրետ արժեքը մուտքագրելու համար:

Այստեղ ես մուտքագրել եմ 100 :

Սեղմեք OK : Եվ դուք կստանաք այն ուսանողներին, ովքեր ստացել են 100 ֆիզիկա և Քիմիա :

<1:>Հիշելու բաներ

Մենք օգտագործեցինք երկչափ զանգված` վերադարձնելու ուսանողների անունները Օգտատիրոջ կողմից սահմանված ֆունկցիայի նկարագրված օրինակում 2 :<3

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