Clicking Cancel on an Inputbox

  • Thread starter Thread starter rott
  • Start date Start date
R

rott

Hi I currently have a macro that brings up an input box. The inputbo
allows the user to enter in a date and if they click ok it proceed
with the rest of the macro.

If the user hits cancel or the x in the corner of the inputbox i
continues to loop until they enter a correct date in. What I am tryin
to do is have the macro end if they hit the cancel button.

Can someone help me out?

Thanks!
 
Excel does not capture details of which button is pressed


Ans = InputBox("Prompt", "title")
If Ans = "" Then
End
End If

You will get the same response if the user presses the ok butto
without entering anything as the user pressing the cancel button
 
From a previous post of mine

Const Msg1 As String = "Enter today's date"
Const Msg2 As String = "You did not enter a valid date." & _
vbNewLine & "Please enter today's date"
Dim UInput As Variant
Dim bLoop As Boolean

Do
UInput = Application.InputBox( _
Prompt:=IIf(bLoop, Msg2, Msg1), _
Default:=Date)
If UInput = False Then Exit Sub
bLoop = True
Loop Until IsDate(UInput)
 
Back
Top