inputbox cancel tuşu

[olymposss]

sn hocalarım herkese hayırlı günler

arama yaptım ama bu konu ile ilgili birşeye rastlamadım.
bir inputbaxım var ok tuşu ile bir görev atamışım.ancak cancel tuşuna basınca da makro devam ediyor.istediğim cancel tuşuna basınca görevden çıkması makroyu tamamlamaması.
yardımcı olacak arkadaşlara şimdiden teşekkür ederim.saygılar:yardim:

 

[Haluk]

Sub Test()
    Dim MyQ As Variant
    MyQ = Application.InputBox("Veri girin...", "Kullanıcının dikkatine !")
    If MyQ = False Then
        MsgBox "Cancel - Vazgec tusuna tıkladınız !"
        Exit Sub
    ElseIf MyQ = Empty Then
        MsgBox "Veri girmediniz"
        Exit Sub
    Else
        MsgBox "Girdiğiniz veri :  " & MyQ
    End If
End Sub

 

[olymposss]

sn haluk verdiğiniz bilgiler için çok teşekkür ederim.saygılar