ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   inputbox (https://www.excelbanter.com/excel-programming/283711-inputbox.html)

DEFJ

inputbox
 
How would I get an inputbox variable to be returned as a
date? I want the user to input a date...the date is then
compared with a list of other dates until the program
finds a date greater than the one entered. The inputbox
returns a string so it won't compare the variable with the
list of dates. Is there a way to convert a string to a
date?

Don Guillett[_4_]

inputbox
 
More details on YOUR string

--
Don Guillett
SalesAid Software

"defj" wrote in message
...
How would I get an inputbox variable to be returned as a
date? I want the user to input a date...the date is then
compared with a list of other dates until the program
finds a date greater than the one entered. The inputbox
returns a string so it won't compare the variable with the
list of dates. Is there a way to convert a string to a
date?




DEFJ

inputbox
 
y = inputbox("enter date","Date")
x=1
do until y < worksheets("").cells(x,2) list of dates
x=x+1
loop

the error I'm getting is that x is "overflowed" (because
it doesn't find a date greater than the one entered)
Though when I look at the list, there are dates greater
than the one entered.

-----Original Message-----
More details on YOUR string

--
Don Guillett
SalesAid Software

"defj" wrote in

message
...
How would I get an inputbox variable to be returned as a
date? I want the user to input a date...the date is

then
compared with a list of other dates until the program
finds a date greater than the one entered. The inputbox
returns a string so it won't compare the variable with

the
list of dates. Is there a way to convert a string to a
date?



.


J.E. McGimpsey

inputbox
 
one way:

Dim result As Variant
Do
result = Application.InputBox("Enter date:", Type:=2)
If result = False Then Exit Sub 'User clicked Cancel
Loop Until IsDate(result)
result = CDate(result)


In article ,
"defj" wrote:

How would I get an inputbox variable to be returned as a
date? I want the user to input a date...the date is then
compared with a list of other dates until the program
finds a date greater than the one entered. The inputbox
returns a string so it won't compare the variable with the
list of dates. Is there a way to convert a string to a
date?


DEFJ

inputbox
 
works like a charm-

thnx

-----Original Message-----
one way:

Dim result As Variant
Do
result = Application.InputBox("Enter date:",

Type:=2)
If result = False Then Exit Sub 'User clicked

Cancel
Loop Until IsDate(result)
result = CDate(result)


In article ,
"defj" wrote:

How would I get an inputbox variable to be returned as

a
date? I want the user to input a date...the date is

then
compared with a list of other dates until the program
finds a date greater than the one entered. The

inputbox
returns a string so it won't compare the variable with

the
list of dates. Is there a way to convert a string to a
date?

.



All times are GMT +1. The time now is 05:36 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com