I den här artikeln visar jag hur du kan utveckla och använda en Ja Nej meddelanderutan i VBA i Excel.

Utveckla och använda en Yes No Message Box med Excel VBA (snabbvisning)

 Sub Yes_No_Message_Box() Answer = MsgBox("Gillar du ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Ladda ner övningsboken

Ladda ner den här arbetsboken för att träna medan du läser den här artikeln.

En översikt över VBA-koden för att utveckla och använda en Yes No Message Box (steg-för-steg-analys)

Låt oss lära oss hur man använder en meddelandefält för ja-nej-meddelanden med ett enkelt exempel. meddelanderuta kommer att ställa dig en fråga: gillar du ExcelWIKI?

Om du svarar ja, klickar du på Ja i den meddelanderuta Och om ditt svar är Ingen klickar du på Ingen .

Vad händer nu när du klickar på ja eller nej i meddelanderuta ? I det aktiva arbetsbladet finns det 2 celler som innehåller antalet personer som gillar eller inte gillar ExcelWIKI. Om du trycker på ja ökar antalet i den likadana cellen med ett.

Och om du slår på ingen ökar siffran i den obehagliga cellen med ett.

Så hur kan man utföra hela denna uppgift med en VBA kod? Enkelt. Det finns 2 viktiga steg i hela processen.

• Utveckling av Meddelanderuta Ja-Nej
• Användning av resultatet av Meddelandebox

Jag visar detaljerna i varje steg för att du ska kunna lära dig.

⧪ Steg 1: Utveckling av Yes-No Message Boxen

Först och främst måste du skapa en ja-nej-meddelande boxen i VBA Detta är enkelt: Använd samma förfarande som för den vanliga meddelanderutan, med frågan om argumentet och ett nytt argument. vbYesNo .

Frågan är här, "Gillar du ExcelWIKI?"

 Svar = MsgBox("Gillar du ExcelWIKI?", vbYesNo) 

⧪ Steg 2: Användning av meddelandeutgången i meddelanderutan

Därefter ska vi utföra en uppgift med hjälp av meddelanderuta utdata. Här kan cell C3 innehåller antalet personer som gillar ExcelWIKI, och cell C4 innehåller antalet personer som inte gillar ExcelWIKI.

Om svaret är Ja , cell C3 kommer att öka med ett. Och om det är Ingen , cell C4 kommer att öka med ett.

Vi använder en If-block för att genomföra detta.

 Om svaret = vbYes Då Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Då Range("C4") = Range("C4") + 1 End If 

Så den fullständiga VBA koden kommer att vara:

⧭ VBA-kod:

 Sub Yes_No_Message_Box() Answer = MsgBox("Gillar du ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If End Sub 

Skapa makron för att utveckla och använda en Yes No Message Box i Excel

Vi har sett den stegvisa analysen av koden för att utveckla och använda en Yes-No meddelanderuta. Nu ska vi se hur vi kan bygga en makro för att köra koden.

⧪ Steg 1: Öppna VBA-fönstret

Tryck på ALT + F11 på tangentbordet för att öppna Visual Basic fönster.

⧪ Steg 2: Infoga en ny modul

Gå till Infoga> Modul i verktygsfältet. Klicka på Modul En ny modul som heter Modul1 (eller något annat beroende på din tidigare historia) öppnas.

⧪ Steg 3: Lägg in VBA-koden

Detta är det viktigaste steget. Sätt in den givna VBA kod i modulen.

⧪ Steg 4: Kör koden

Klicka på Kör Sub / UserForm i verktygsfältet ovan.

Koden kommer att köras. A meddelanderuta kommer att fråga dig om du gillar ExcelWIKI eller inte, med en Ja och en Ingen alternativ.

Om du väljer Ja , siffran i cellen C3 kommer att öka med ett. Och om du väljer Ingen , siffran i cellen C4 kommer att öka med ett.

Här har jag valt ja , så antalet personer som gillar ExcelWIKI har ökat med ett.

Saker att komma ihåg

• A meddelanderuta på VBA innehåller sammanlagt 4 parametrar som kallas Uppmaning, knapp, titel , och Hjälpfil Här har jag endast visat 2 parametrar, Uppmaning och Knapp . Men om du vill upptäcka den VBA-meddelanderuta mer detaljerat kan du läsa på denna länk.