selecting cancel gives me FALSE

[tvonbehren]

i have a code that i am using but however when I click on the cancel it is giving me a false in the cell when all I am want is to cancel and leave the information in the cell. Here is an example of the code i am using. I am new to using VBA so please bare with me and any help would be greatly appreciated. Thank you

If Target.Address = "$E$115" Then
   myDate = Application.InputBox("Enter A Date", "Date Entry")
    Sheets(3).Range(Target.Address) = myDate
    Sheets(3).Range("$E$114") = myDate
    Sheets(2).Range("$D$12") = myDate
 End If

[romperstomper]

Try:

If Target.Address = "$E$115" Then
myDate = Application.InputBox("Enter A Date", "Date Entry")
If myDate <> False Then
Sheets(3).Range(Target.Address) = myDate
Sheets(3).Range("$E$114") = myDate
Sheets(2).Range("$D$12") = myDate
End If
End If

[sweep]

Or...

If Target.Address = "$E$115" Then
myDate = Application.InputBox("Enter A Date", "Date Entry")
If myDate = False Then GoTo WayOut
Sheets(3).Range(Target.Address) = myDate
Sheets(3).Range("$E$114") = myDate
Sheets(2).Range("$D$12") = myDate

WayOut:
End If

[mudraker]

tvonbehren

Please take a couple of minutes and read ALL theForum Rules then wrap your VBA code (Rule 3)

[tvonbehren]

Thank you for the help both of these work great.