If inputbox cancel vba

Private Sub test()
    Dim result As String
    result = InputBox("Enter Date MM/DD/YYY", "Date Confirmation", Now)
    If StrPtr(result) = 0 Then
        MsgBox ("User canceled!")
    ElseIf result = vbNullString Then
        MsgBox ("User didn't enter anything!")
    Else
        MsgBox ("User entered " & result)
    End If
End Sub

Source: stackoverflow.com

Similar codes

4 votes132 views1 answer
Excel vba determine number of elements in an array
VBA
8 votes253 views1 answer
Vba convert 2 bytes to an integer
VBA
1 vote131 views1 answer
Textbox find and replace vb
VBA
1 vote149 views1 answer
Excel vba last row of range
VBA
25 votes269 views3 answers
String to date vb
VBA
0 vote146 views1 answer
Label de tableau dans des label.text en VBA
VBA
5 votes155 views1 answer
Excel-vba get integer high byte
VBA
4 votes147 views1 answer
Excel vba how to programmatically remove the marching ants after range copy
VBA
0 vote131 views1 answer
Get current year vb
VBA
0 vote151 views4 answers
Vgrive,deb
VBA