So überprüfen Sie, ob ein Benutzer in VBA in einer InputBox auf [Abbrechen] geklickt hat

Wussten Sie, dass es möglich ist, zu unterscheiden, ob ein Benutzer in einer InputBox auf "OK" klickt oder auf "Abbrechen", selbst wenn er keinen Text eingegeben hat?

Betrachten Sie den folgenden Beispielcode:

Sub InputBoxTest()
    Dim Result As String
    
    Result = InputBox("Leave this box blank")
    If StrPtr(Result) = 0 Then
        Debug.Print "User clicked [Cancel]"
    ElseIf Len(Result) = 0 Then
        Debug.Print "User clicked [OK]"
    Else
        Debug.Print "User can't follow instructions"
    End If
    
End Sub

Hier ist der Testcode in Aktion:

Wenn Sie daran interessiert sind, warum das funktioniert, empfehle ich die folgende Frage zu Stackoverflow:Was sind die Vorteile und Risiken der Verwendung von StrPtr in VBA? Die beiden am besten bewerteten Antworten (von den Benutzern Comintern und GSerg) sind für Hintergrundwissen lesenswert.

Externe Referenzen