Wie verwende ich im Excel-VBA-Makro eine MsgBox mit vbYesNo, sodass bei Yes fortgesetzt und bei No mit Exit Sub beendet wird?

Question

Accepted Answer

In VBA setzt du den Rückgabewert der `MsgBox` auf eine Variable und prüfst ihn:

```vba
Sub Beispiel()
    Dim r As VbMsgBoxResult

r = MsgBox("Weiter machen", vbYesNo + vbQuestion, "Frage")

If r = vbNo Then Exit Sub

' bei Yes geht es hier weiter
    ' ...
End Sub
```

Verwandte Fragen