How To Use The VBA Input Box Cancel Button To Exit Sub

This post will demonstrate how you can use the VBA input box cancel button to
exit the sub procedure.

When you click the “Cancel” button on the input box, you return a null (blank) value, and
knowing this information, you can exit the sub procedure.

Here is an example:

Sub VBAInputBoxCancel()
    Dim strResponse As String
    
    strResponse = InputBox("Enter the Password To Continue", "Enter Credentials")
        
    'A clicked 'Cancel' button will result in a blank value
    If strResponse = "" Then
        MsgBox "You clicked the cancel button", vbInformation, "Bye"
        Exit Sub
    Else
        Select Case strResponse
            Case "Proc33d"
                MsgBox "Thank you"
            Case Else
                MsgBox "Wrong Password"
                Exit Sub
        End Select
    End If
End Sub