Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
INPUTBOX QUERY-DATE
Dim DOB as date
On Error Resume Next DOBAGAIN: DOB = Application.InputBox("e.g DD-MM-YY", "Please enter DATE OF BIRTH", , 200, 170, Type:=2) If Err = 13 Then GoTo DOBAGAIN: On Error GoTo 0 i would like only a six digit date to be entered and for the date to be valid. How can i achieve this? Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
INPUTBOX QUERY-DATE
Hi Sunil
I am not sure which link you use to post your queries. I would suggest to use microsoft discussion forum itself.. http://www.microsoft.com/office/comm...&lang=en&cr=US If this post helps click Yes --------------- Jacob Skaria "sunilpatel" wrote: Dim DOB as date On Error Resume Next DOBAGAIN: DOB = Application.InputBox("e.g DD-MM-YY", "Please enter DATE OF BIRTH", , 200, 170, Type:=2) If Err = 13 Then GoTo DOBAGAIN: On Error GoTo 0 i would like only a six digit date to be entered and for the date to be valid. How can i achieve this? Thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Change Excel query with a inputbox | Excel Programming | |||
InputBox Query | Excel Programming | |||
Using InputBox to get desired date for a Query pulling data from Access into Excel | Excel Programming | |||
Using InputBox to get desired date for a Query pulling data from Access into Excel | Excel Programming | |||
Using InputBox to change query criteria in Access | Excel Programming |