Tässä artikkelissa näytän sinulle, miten voit kehittää ja hyödyntää Kyllä Ei viestiruutu VBA Excelissä.

Kehitä ja käytä Kyllä Ei -viestiruutua Excel VBA:lla (Pikakatselu).

 Sub Yes_No_Message_Box() Vastaus = MsgBox("Pidätkö ExcelWIKI:stä?", vbYesNo) If Vastaus = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Vastaus = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Lataa harjoituskirja

Lataa tämä harjoituskirja, jotta voit harjoitella tätä artikkelia lukiessasi.

Yleiskatsaus VBA-koodiin Kyllä Ei-viestikentän kehittämiseksi ja käyttämiseksi (vaiheittainen analyysi)

Opetellaan käyttämään kyllä-ei-viestikenttä yksinkertaisella esimerkillä. viestikenttä kysyn sinulta kysymyksen, pidätkö ExcelWIKIstä?

Jos vastauksesi on kyllä, klikkaat Kyllä vuonna viestikenttä . Ja jos vastauksesi on Ei , napsautat Ei .

Mitä tapahtuu sen jälkeen, kun valitset kyllä tai ei kentässä viestikenttä ? Aktiivisella työarkilla on 2 solut, jotka sisältävät ExcelWIKIstä pitävien ja siitä inhoavien ihmisten lukumäärän. Jos painat näppäintä kyllä , samankaltaisen solun numero kasvaa yhdellä.

Ja jos osut ei , epäsopivan solun numero kasvaa yhdellä.

Joten, miten tämä koko tehtävä voidaan toteuttaa yhdellä VBA koodia? Helppoa. On olemassa 2 koko prosessin tärkeimmät vaiheet.

• Kehittämällä Kyllä/Ei viestikenttä
• Käyttämällä Output of the Viestilaatikko

Näytän jokaisen vaiheen yksityiskohdat oppimista varten.

⧪ Vaihe 1: Kyllä-ei-viestikentän kehittäminen

Ensin sinun on luotava kyllä-ei-viesti ruutuun VBA Tämä on helppoa. Käytä samaa menettelyä kuin tavallisessa viestikentässä, jossa on kysymys argumentista ja uusi argumentti. vbYesNo .

Kysymys kuuluu, "Pidätkö ExcelWIKIstä?"

 Vastaus = MsgBox("Pidätkö ExcelWIKIstä?", vbYesNo) 

⧪ Vaihe 2: Viestiruudun tulosteen käyttäminen

Seuraavaksi suoritamme tehtävän käyttämällä komentoa viestikenttä Tässä tapauksessa solu C3 sisältää ExcelWIKI:stä pitävien ihmisten määrän, ja solu C4 sisältää niiden ihmisten määrän, jotka eivät pidä ExcelWIKIstä.

Jos vastaus on Kyllä , solu C3 kasvaa yhdellä. Ja jos se on Ei , solu C4 kasvaa yhdellä.

Käytämme If-lohko tämän toteuttamiseksi.

 If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If 

Joten täydellinen VBA koodi on:

⧭ VBA-koodi:

 Sub Yes_No_Message_Box() Vastaus = MsgBox("Pidätkö ExcelWIKI:stä?", vbYesNo) If Vastaus = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Vastaus = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Makron luominen Kyllä Ei -viestiruudun kehittämiseksi ja käyttämiseksi Excelissä

Olemme nähneet vaiheittaisen analyysin koodista, jolla kehitetään ja käytetään kyllä-ei-viestiruutua. Katsotaan nyt, miten voimme rakentaa makron koodin suorittamiseksi.

⧪ Vaihe 1: VBA-ikkunan avaaminen

Paina ALT + F11 näppäimistöllä avataksesi Visual Basic ikkuna.

⧪ Vaihe 2: Uuden moduulin lisääminen

Siirry osoitteeseen Lisää> Moduuli työkalupalkissa. Napsauta Moduuli Uusi moduuli nimeltä Moduuli1 (tai jotain muuta aiemmasta historiastasi riippuen) avautuu.

⧪ Vaihe 3: VBA-koodin asettaminen

Tämä on tärkein vaihe. Aseta annetut VBA koodia moduulissa.

⧪ Vaihe 4: Koodin suorittaminen

Napsauta Suorita Sub / UserForm työkalua yläpuolella olevasta työkalurivistä.

Koodi suoritetaan. A viestikenttä kysyy sinulta, pidätkö ExcelWIKI tai ei, ja Kyllä ja Ei vaihtoehto.

Jos valitset Kyllä , numero solussa C3 kasvaa yhdellä. Ja jos valitset Ei , numero solussa C4 kasvaa yhdellä.

Tässä olen valinnut kyllä , joten niiden ihmisten määrä, jotka pitävät ExcelWIKI on kasvanut yhdellä.

Muistettavat asiat

• A viestikenttä osoitteessa VBA sisältää yhteensä 4 parametrit nimeltään Kehote, painike, otsikko ja Ohjetiedosto . Tässä olen näyttänyt vain 2 parametrit, Kehotus ja Nappi . Mutta jos haluat löytää VBA-viestiruutu tarkemmin, voit tarkistaa tämän linkin.