Compare dates in VBA

[Dazza1970]

I'm trying to compare a date, that I grab from an excel cell, to see if it falls between two dates, as in:

(Not real code)

variable = excel cell value

Select case variable
case ((variable >= firstdate) AND (variable<=seconddate)
.....

The problem i'm getting is that it is treating the variables as strings, even if I use a dim statement to make sure it is a Date.
Any help would be appreciated.

I thought it would be as simple as on the excel sheet i.e.
Date1 > Date2 etc

 

[SkipVought]

Hi,

Why do Dates and Times seem to be so much trouble? faq68-5827


Skip,

_{[red]Be Advised![/red]
A wee deranged psychic may be runnin' around out there!
SMALL MEDUIM @ LARGE}

 

[SkipVought]

...chances are that you do NOT really have DATES.

Rather you have STRINGS that you will need to convert to DATES, using the DateSerial function or DateValue, for instance.


Skip,

_{[red]Be Advised![/red]
A wee deranged psychic may be runnin' around out there!
SMALL MEDUIM @ LARGE}

 

[Dazza1970]

I thought I was converting the cell I grabbed from excel into a date. Still not working, no matter what I do.
Failing that is there any method or function in VBA to convert a date into its equivalent serial number?

 

[vladk]

This one:

Select case variable
case ((variable >= firstdate) AND (variable<=seconddate)

does not make any sence. It should be at least like that:

Select case true
case ((variable >= firstdate) AND (variable<=seconddate)

 

[vladk]

with one extra right ")

 

[SkipVought]

as already stated...

DateSerial function or DateValue function.


Skip,

_{[red]Be Advised![/red]
A wee deranged psychic may be runnin' around out there!
SMALL MEDUIM @ LARGE}