Sa artikulong ito, ipapakita ko sa iyo kung paano mo masusuri ang sitwasyon sa Excel VBA kung may value ang isang cell. Matututuhan mong pag-aralan ang sitwasyon para sa parehong halaga at isang partikular na halaga.

Pagsusuri sa Excel VBA: Kung Naglalaman ng Halaga ang Cell, (Quick View)

5151

I-download ang Workbook ng Practice

I-download ang workbook ng pagsasanay na ito upang mag-ehersisyo habang binabasa mo ang artikulong ito.

Pagsusuri ng Excel VBA: Kung May Halaga ang Cell Pagkatapos Magbalik ng Mga Output (Step by Step Analysis)

Narito mayroon kaming set ng data na may mga marka ng ilang mga mag-aaral sa Physics, Chemistry, at Mathematics sa isang paaralan na tinatawag na Sunflower Kindergarten.

Ang mga blangkong cell ay nangangahulugang hindi lumabas ang estudyante, ibig sabihin, ay wala sa partikular na pagsusulit na iyon. Ngayon, suriin natin ang sitwasyon, kung ang isang cell ay naglalaman ng isang halaga o wala, gamit ang set ng data na ito.

⧪ Hakbang 1: Pagdedeklara ng Cell

Una, kailangan nating ideklara ang cell na ang halaga ay gusto nating suriin. Suriin natin kung lumabas si Jennifer Marlo sa pagsusulit sa Physics o hindi.

Samakatuwid, kailangan nating suriin kung ang cell C12 ay may value o wala.

Para magawa iyon, una, kailangan nating ideklara ang cell C12 .

Ang linya ng code para magawa ito ay:

2657

⧪ Hakbang 2: Pagsuri Kung Naglalaman ang Cell isang Halaga (Kabilang ang isang Partikular na Halaga)

Susunod, titingnan natin kungang cell ay naglalaman ng isang halaga o wala. Ipapatupad namin ito gamit ang isang Kung kundisyon . Ang linya ng  code ay:

5128

Ipapatupad ang code na ito kung naglalaman ang cell ng anumang value. Upang tingnan ang isang value (Halimbawa, naglalaman man ito ng 100 o wala), gamitin ang partikular na value na iyon na may simbolo na Katumbas ng .

5833

⧪ Hakbang 3: Paglalaan ng Gawain

Pagkatapos ay kailangan mong mag-set up ng isang gawain na isasagawa kung ang cell ay naglalaman ng isang halaga (o isang partikular na halaga).

Dito, gusto naming ipakita ang mensahe “Lumabas si Jennifer Marlo sa pagsusulit sa Physics.” . Kaya ang linya ng code ay magiging:

7781

⧪ Hakbang 4: Pagtatapos sa If Block

Sa wakas, kailangan mong magdeklara ng pagtatapos sa If block.

2617

Kaya ang kumpletong VBA code ay magiging:

⧭ VBA Code:

6273

⧭ Output:

Patakbuhin ang code na ito sa pamamagitan ng pag-click sa button na Run Sub/UserForm sa toolbar.

Ipapakita nito ang mensahe “Lumataw si Jennifer Marlo sa pagsusulit sa Physics.” dahil ang cell C12 ay naglalaman ng value, na 50 .

Mga Halimbawang Kinasasangkutan Kung Naglalaman ng Halaga ang Cell Pagkatapos ay Isang Tinukoy na Output na may Excel VBA

Natutunan naming suriin kung ang isang cell ay naglalaman ng isang halaga o wala sa VBA . Ngayon, tuklasin natin ang ilang halimbawa para maging malinaw ang pag-unawa.

1. Pagbuo ng Macro upang I-filter ang isang Halaga Kung ang Kaukulang Cell ay Naglalaman ng anumang Halaga pagkatapos ay sa Excel VBA

Bumuo tayo ng isang Macro upang i-filter ang mga mag-aaral na lumabas sa bawat isa sa mga pagsusulit.

Ibig sabihin, kailangan nating suriin ang mga cell na naglalaman ng mga marka ng bawat paksa at tingnan kung naglalaman ang mga ito ng halaga o hindi.

Kung gagawin nila, kailangan nating ayusin ang pangalan ng kaukulang mag-aaral.

Ang kumpletong VBA code para magawa ito ay:

⧭ VBA Code:

3384

⧭ Output:

Piliin ang set ng data ( Kasama ang Mga Header ) at patakbuhin itong Macro .

Una, hihilingin sa iyong ilagay ang reference ng una cell kung saan mo nais ang na-filter na data. Ipinasok ko ang G3 .

Pagkatapos ay i-click ang OK . Makukuha mo ang mga pangalan ng mga mag-aaral na lumabas sa bawat isa sa mga pagsusulit (Kabilang ang Mga Header ) sa isang bagong set ng data simula sa cell G3 .

2. Paglikha ng Function na Tinukoy ng Gumagamit upang Pagbukud-bukurin ang isang Halaga Kung Naglalaman ang Kaukulang Cell ng Tukoy na Halaga pagkatapos ay sa Excel VBA

Ngayon gagawa kami ng function na tinukoy ng gumagamit na magbabalik ng mga pangalan ng mga mag-aaral na nakakuha ng tiyak na marka sa bawat asignatura.

Ang pamamaraan ay halos pareho sa itaas. Kailangan nating suriin ang mga cell na naglalaman ng mga marka ng bawat isa sa mga asignatura at tingnan kung ang mga ito ay katumbas ng isang partikular na halaga o hindi.

Kung oo, ibabalik namin ang pangalan ng kaukulang estudyante.

Ang VBA code ay magiging:

⧭ VBACode:

1495

⧭ Output:

Gumagawa ang code ng function na tinatawag na Cells_with_Values na tumatagal ng dalawang argumento, isang Range at isang Value .

Alamin natin ang mga mag-aaral na nakakuha ng 100 sa bawat paksa gamit ang function na ito.

Pumili ng hanay ng mga cell sa iyong worksheet at ilagay ang function na ito sa unang cell ng range:

[Dito B3: Ang E3 ay ang aking set ng data (Kabilang ang Mga Header ) at 100 ang aking katumbas na halaga. Gamitin mo ang iyong isa.]

Pagkatapos ay pindutin ang CTRL + SHIFT + ENTER ( Array Formula ). Magbabalik ito ng array na binubuo ng mga pangalan ng mga mag-aaral na nakakuha ng 100 sa bawat subject, kasama ang Mga Header .

3. Pagbuo ng UserForm para Mag-extract ng Value kung ang Kaukulang Cell ay Naglalaman ng anumang Value (O isang Specific Value) sa Excel VBA

Sa wakas, bubuo kami ng UserForm para kunin ang mga pangalan ng mga mag-aaral na lumitaw (o nakakuha ng mga partikular na marka) sa ilang partikular na pagsusulit.

⧪ Hakbang 1: Pagbubukas ng UserForm

Pumunta sa Insert > UserForm na opsyon sa VBA editor upang magbukas ng bagong UserForm . Isang bagong UserForm na tinatawag na UserForm1 ang bubuksan.

⧪ Hakbang 2: Pag-drag ng Mga Tool sa UserForm

Bukod sa UserForm , makukuha mo ang Toolbox . Ilipat ang iyong cursor sa ibabaw ng Toolbox at i-drag ang 4 na Label (Label1, Label2,Label3, Label4) at 3 ListBoxes (ListBox1, ListBox2, ListBox3) at isang TextBox (TextBox1) sa isang hugis-parihaba na hugis sa ibabaw ng UserForm .

Pagkatapos ay i-drag ang isa pang Label (Label5) at isang TextBox (TextBox2) sa kaliwang sulok sa ibaba ng UserForm .

Sa wakas, i-drag ang isang CommandButton (CommandButton1) sa kanang sulok sa ibaba.

Palitan ang mga display ng Labels sa Lookup Column , Return Column , Anumang Value o isang Partikular na Value , Value, at Panimulang Cell.

Gayundin, baguhin ang display ng CommandButton1 sa OK .

⧪ Hakbang 3: Pagsulat ng Code para sa ListBox3

I-double click sa ListBox3 . Magbubukas ang isang Pribadong Subprocedure na tinatawag na ListBox3_Click . Ilagay ang sumusunod na code doon.

7016

⧪ Hakbang 4: Pagsulat ng Code para sa CommandButton1

Pagkatapos ay i-double click ang CommandButton1 . Ang isa pang Private Subprocedure na tinatawag na CommandButton1_Click ay magbubukas. Ilagay ang sumusunod na code doon.

5981

⧪ Hakbang 5: Pagsulat ng Code para sa Pagpapatakbo ng UserForm

Sa wakas, magpasok ng bagong Module mula sa VBA toolbar at ipasok ang sumusunod na code doon.

9541

⧪ Hakbang 6: Pagpapatakbo ng UserForm (Ang Huling Output)

Ang iyong UserForm ay handa nang gamitin. Piliin ang set ng data mula sa worksheet ( B3:E13 dito) (Kabilang ang Mga Header ) atpatakbuhin ang Macro na tinatawag na Run_UserForm .

Ilo-load ang UserForm sa worksheet. Mula sa talahanayan ng Haligi ng Paghahanap , pinili ko ang Physics at Mathematics , dahil gusto kong makuha ang mga pangalan ng mag-aaral na lumabas sa Physics at Mathematics na mga pagsusulit.

Mula sa talahanayan ng Return Column , pinili ko ang Pangalan ng Mag-aaral , dahil gusto kong makuha ang mga pangalan ng mag-aaral.

At mula sa talahanayan na Any Value o Specific Value , pinili ko ang Any Value .

Sa wakas, sa Starting Cell box, inilagay ko ang G3 .

Pagkatapos ay i-click ang OK . Makukuha mo ang mga pangalan ng mga mag-aaral na lumabas sa Physics at Mathematics exam simula sa cell G3 .

Kung pinili mo ang Tiyak na Halaga mula sa talahanayan ng Anumang Halaga o Tukoy na Halaga , magkakaroon ka ng isa pang TextBox upang ipasok ang partikular na halaga.

Narito, ipinasok ko ang 100 .

I-click ang OK . At makukuha mo ang mga mag-aaral na nakakuha ng 100 sa Physics at Chemistry .

Mga Dapat Tandaan

Gumamit kami ng two-dimensional array para ibalik ang mga pangalan ng mag-aaral sa User-Defined Function na inilarawan sa halimbawa 2 .