In dit artikel laat ik je zien hoe je een Ja Nee berichtvak in VBA in Excel.

Een Ja/Nee-berichtvak ontwikkelen en gebruiken met Excel VBA (Snelle weergave)

 Sub Ja_NeeMessage_Box() Antwoord = MsgBox("Vind je ExcelWIKI leuk?", vbJaNee) Als Antwoord = vbJa dan Range("C3") = Range("C3") + 1 ElseAls Antwoord = vbNee dan Range("C4") = Range("C4") + 1 End If End Sub 

Download Praktijk Werkboek

Download dit oefenwerkboek om te oefenen terwijl u dit artikel leest.

Een overzicht van de VBA-code voor het ontwikkelen en gebruiken van een Ja/Nee-berichtvak (stapsgewijze analyse)

Laten we het gebruik van een ja-nee bericht box met een eenvoudig voorbeeld. De berichtvak zal je een vraag stellen, hou je van ExcelWIKI?

Als uw antwoord ja is, klikt u op Ja in de berichtvak En als je antwoord is Geen dan klikt u op Geen .

Nu, wat gebeurt er nadat u ja of nee hebt geklikt in het berichtvak In het actieve werkblad zijn er 2 cellen die het aantal mensen bevatten die ExcelWIKI wel en niet leuk vinden. Als je op ja zal het getal in de soortgelijke cel met één toenemen.

En als je geen zal het getal in de andere cel met één toenemen.

Dus, hoe deze hele taak te volbrengen met een VBA code? Makkelijk. Er zijn 2 belangrijke stappen in het hele proces.

• Het ontwikkelen van de Ja-Nee Berichtenbox
• Met behulp van de uitvoer van de Berichtenbox

Ik laat de details van elke stap zien zodat je het kunt leren.

⧪ Stap 1: Ontwikkeling van het Ja-Nee Berichtenvak

Allereerst moet u de ja-nee bericht doos in VBA Dit is gemakkelijk. Gebruik dezelfde procedure als het gewone berichtvenster, met de vraag naar het argument, samen met een nieuw argument vbJaNee .

Hier is de vraag, "Vind je ExcelWIKI leuk?"

 Antwoord = MsgBox("Vind je ExcelWIKI leuk?", vbJaNee) 

⧪ Stap 2: De uitvoer van de berichtenbox gebruiken

Vervolgens voeren we een taak uit met behulp van de berichtvak output. Hier, cel C3 bevat het aantal mensen die ExcelWIKI leuk vinden, en cel C4 bevat het aantal mensen die ExcelWIKI niet leuk vinden.

Dus, als het antwoord is Ja , cel C3 zal met één toenemen. En als het Geen , cel C4 zal met één toenemen.

We gebruiken een Als-blok om dit uit te voeren.

 Als Antwoord = vbJa Dan Range("C3") = Range("C3") + 1 ElseIf Antwoord = vbNee Dan Range("C4") = Range("C4") + 1 End If 

Dus de volledige VBA code zal zijn:

⧭ VBA-code:

 Sub Ja_NeeMessage_Box() Antwoord = MsgBox("Vind je ExcelWIKI leuk?", vbJaNee) Als Antwoord = vbJa Dan Range("C3") = Range("C3") + 1 ElseAls Antwoord = vbNee Dan Range("C4") = Range("C4") + 1 End If End Sub 

De macro maken voor het ontwikkelen en gebruiken van een Ja/Nee-berichtvak in Excel

We hebben de stapsgewijze analyse gezien van de code om een Ja-Nee berichtenbox te ontwikkelen en te gebruiken. Laten we nu eens kijken hoe we een Macro kunnen bouwen om de code uit te voeren.

⧪ Stap 1: Het VBA-venster openen

Druk op ALT + F11 op uw toetsenbord om de Visual Basic raam.

⧪ Stap 2: Een nieuwe module invoegen

Ga naar Invoegen> Module in de werkbalk. Klik op Module Een nieuwe module genaamd Module1 (of iets anders, afhankelijk van je verleden) wordt geopend.

⧪ Stap 3: De VBA-code plaatsen

Dit is de belangrijkste stap. Voeg de gegeven VBA code in de module.

⧪ Stap 4: De code uitvoeren

Klik op de Run Sub / UserForm in de werkbalk hierboven.

De code wordt uitgevoerd. A berichtvak zal je vragen of je ExcelWIKI of niet, met een Ja en een Geen optie.

Als u kiest voor Ja het getal in cel C3 zal met één toenemen. En als u kiest voor Geen het getal in cel C4 zal met één toenemen.

Hier heb ik gekozen voor ja dus het aantal mensen die ExcelWIKI is met één toegenomen.

Dingen om te onthouden

• A berichtvak in VBA bevat in totaal 4 parameters genaamd Prompt, Knop, Titel en Helpfile Hier heb ik alleen 2 parameters, Prompt en Knop Maar als je de VBA-berichtvenster in meer detail, kunt u deze link bekijken.