Come rilevare se l'utente seleziona annulla InputBox VBA Excel

Question

Ho una casella di immissione che chiede all'utente di inserire una data. Come faccio a far sapere al programma di interromperlo se l'utente fa clic su annulla o chiude la finestra di dialogo di immissione invece di premere OK.

Qualcosa di simile if str=vbCancel then exit sub

Attualmente, l'utente può colpire OK o Annulla, ma il programma viene eseguito ancora

str = InputBox(Prompt:="Enter Date MM/DD/YYY", _ Title:="Date Confirmation", Default:=Date)

Answer 1

Se l'utente sceglie Annulla, una stringa di lunghezza zero viene restituito. Non è possibile differenziare questo dall'inserimento di una stringa vuota. È comunque possibile effettuare la propria classe InputBox personalizzato ...

Il vostro esempio

Private Sub test() 
    Dim Str As String 
    Str = InputBox("Enter Date MM/DD/YYY", "Date Confirmation", Now) 
    If Str = vbNullString Then 
     MsgBox ("User canceled!") 
    End If 
End Sub 

Sarebbe dire all'utente hanno annullato quando eliminare la stringa di default, oppure fare clic su Annulla.

Vedi http://msdn.microsoft.com/en-us/library/6z0ak68w(v=vs.90).aspx