Kazalo
V tem članku vam bom pokazal, kako lahko razvijete in uporabite Da Ne polje za sporočila v VBA v Excelu.
Razvoj in uporaba polja za sporočila Da Ne s programom Excel VBA (hitri prikaz)
Sub Yes_No_Message_Box() Odgovor = MsgBox("Ali vam je všeč ExcelWIKI?", vbYesNo) Če odgovor = vbYes Potem Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Potem Range("C4") = Range("C4") + 1 End If End Sub 
Prenesi delovni zvezek za prakso
Prenesite ta delovni zvezek za vadbo, ki ga lahko uporabljate med branjem tega članka.
Da Ne Polje za sporočila.xlsmPregled kode VBA za razvoj in uporabo polja za sporočila Da Ne (analiza po korakih)
Naučimo se uporabljati polje za sporočila da-ne s preprostim primerom. polje za sporočila vam bo postavil vprašanje, ali vam je všeč ExcelWIKI?
Če je vaš odgovor pritrdilen, boste kliknili Da v polje za sporočila . In če je vaš odgovor Ne , kliknete Ne .
Kaj se bo zgodilo, ko boste kliknili da ali ne v oknu polje za sporočila ? V aktivnem delovnem listu so 2 celice, ki vsebujejo število ljudi, ki jim je ExcelWIKI všeč in jim ni všeč. da , se število v podobni celici poveča za ena.
In če zadenete ne , se število v neodobravani celici poveča za ena.
Kako torej opraviti to nalogo z VBA koda? Enostavno. 2 glavnih korakov v celotnem postopku.
- Razvijanje Okno za sporočila Da-Ne
- Uporaba izhodnih podatkov Polje za sporočila
Prikazujem podrobnosti vsakega koraka za vaše učenje.
⧪ Korak 1: Razvoj polja za sporočila Da-Ne
Najprej morate ustvariti sporočilo da-ne polje v VBA To je enostavno. Uporabite enak postopek kot pri običajnem sporočilnem oknu z vprašanjem glede argumenta in novim argumentom. vbYesNe .
Vprašanje je, "Ali vam je všeč ExcelWIKI?"
Odgovor = MsgBox("Ali vam je všeč ExcelWIKI?", vbYesNo) 
⧪ Korak 2: Uporaba izhodnega polja za sporočila
Nato bomo opravili nalogo z uporabo polje za sporočila Tu je celica C3 vsebuje število ljudi, ki jim je všeč ExcelWIKI, celica C4 vsebuje število ljudi, ki jim ExcelWIKI ni všeč.
Če je odgovor Da , celica C3 se bo povečal za ena. In če je Ne , celica C4 se poveča za ena.
Uporabili bomo Če je blok za izvedbo.
Če je odgovor = vbYes Potem Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Potem Range("C4") = Range("C4") + 1 End If 
Tako je celoten VBA koda bo:
⧭ Koda VBA:
Sub Yes_No_Message_Box() Odgovor = MsgBox("Ali vam je všeč ExcelWIKI?", vbYesNo) Če odgovor = vbYes Potem Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Potem Range("C4") = Range("C4") + 1 End If End Sub
Ustvarjanje makra za razvoj in uporabo polja za sporočila Da Ne v Excelu
Videli smo analizo kode po korakih za razvoj in uporabo polja s sporočili Da-Ne. Zdaj si oglejmo, kako lahko sestavimo makro program za zagon kode.
⧪ Korak 1: Odpiranje okna VBA
Pritisnite ALT + F11 na tipkovnici, da odprete Visual Basic okno.
⧪ Korak 2: Vstavljanje novega modula
Pojdi na Vstavljanje> Modul v orodni vrstici. Kliknite na Modul . Nov modul z imenom Modul1 (ali kaj drugega, odvisno od vaše pretekle zgodovine).
⧪ Korak 3: Vnos kode VBA
To je najpomembnejši korak. Vstavite dano VBA koda v modulu.
⧪ 4. korak: zagon kode
Kliknite na Run Sub / UserForm orodje v zgornji orodni vrstici.
Koda se bo zagnala. A polje za sporočila vas bo vprašal, ali vam je všeč ExcelWIKI ali ne, z Da in Ne možnost.
Če izberete Da , število v celici C3 se bo povečal za ena. Če izberete Ne , število v celici C4 se poveča za ena.
Tu sem izbral da , tako da je število ljudi, ki jim je všeč ExcelWIKI se je povečal za ena.
Stvari, ki si jih je treba zapomniti
- A polje za sporočila na spletnem mestu VBA vsebuje skupno 4 parametri, ki se imenujejo Poziv, gumb, naslov in Pomožna datoteka . Tukaj sem prikazal le 2 parametri, Poziv in . Gumb . Če pa želite odkriti Polje za sporočila VBA podrobneje si lahko ogledate to povezavo.
