Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
I have the following code segment:
StartDate = Date StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) How can I tell if the user clicked Cancel instead of OK? -- Regards, Fred |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
Hi Fred,
StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) If StartDate = False Then MsgBox "User pressed cancel" End If -- Hope that helps. Vergel Adriano "Fred Smith" wrote: I have the following code segment: StartDate = Date StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) How can I tell if the user clicked Cancel instead of OK? -- Regards, Fred |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
Thanks, Vergel.
Does that mean I need StartDate to be type Variant, rather than Date? -- Regards, Fred "Vergel Adriano" wrote in message ... Hi Fred, StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) If StartDate = False Then MsgBox "User pressed cancel" End If -- Hope that helps. Vergel Adriano "Fred Smith" wrote: I have the following code segment: StartDate = Date StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) How can I tell if the user clicked Cancel instead of OK? -- Regards, Fred |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
It seems that you don't need to define StartDate as a variant.
Sub test() Dim StartDate As Date StartDate = Date StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) If StartDate = False Then MsgBox "User pressed cancel" End If 'this also works If StartDate = #12:00:00 AM# Then MsgBox "User pressed cancel" End If 'and this one too If StartDate = 0 Then MsgBox "User pressed cancel" End If End Sub -- Hope that helps. Vergel Adriano "Fred Smith" wrote: Thanks, Vergel. Does that mean I need StartDate to be type Variant, rather than Date? -- Regards, Fred "Vergel Adriano" wrote in message ... Hi Fred, StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) If StartDate = False Then MsgBox "User pressed cancel" End If -- Hope that helps. Vergel Adriano "Fred Smith" wrote: I have the following code segment: StartDate = Date StartDate = Application.InputBox("First valid date", , StartDate, , , , , 1) How can I tell if the user clicked Cancel instead of OK? -- Regards, Fred |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
Yes.
Fred Smith wrote: Thanks, Vergel. Does that mean I need StartDate to be type Variant, rather than Date? |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for Cancel in Inputbox
Thanks for your help. It was exactly what I was looking for. It works like a
charm and, as you say, without needing to use Variant. -- Regards, Fred "equiangular" wrote in message ... Yes. Fred Smith wrote: Thanks, Vergel. Does that mean I need StartDate to be type Variant, rather than Date? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I capture CANCEL on an Inputbox? | Excel Programming | |||
InputBox - cancel button | Excel Programming | |||
InputBox Function & Cancel | Excel Programming | |||
Clicking Cancel on an Inputbox | Excel Programming | |||
Inputbox and cancel button | Excel Programming |