Concat + dates

[Guest]

Hi,

I have a Cur Year ( a 4 digit number) a CurMonth (2 digit
num) and a cell.Value (2digit day).

I want to Concatonate these so I have day/month/year to do
a date comparison with another date.

This is what I have but I am getting a datatype error

Set CurDate = (CStr(cell.Value) & "/" & CStr(CurMonth)
& "/" & CStr(CurYear))

or

Set CurDate = (cell.Value & "/" & CurMonth & "/" & CurYear)


....

 

[Libby]

This may help

curyear = "2003"
curmonth = "05"
mycell = Sheet1.Range("a3")

CurDate = (mycell & "/" & curmonth & "/" & curyear)
CurDate = Format(DateValue(CurDate), "dd/mmm/yyyy")

Libby

 

[Dianne]

How about:

DateSerial(curYear,curMonth,cell.value)

 

[Guest]

Thanks guys,

DateSerial(a1,a2,a3) worked perfectly!