Any way to bring a date to the current year?

[SigAdams]

For example, if I had the date 02/01/1987

Is there any way to automatically convert it to 02/01/2012?

Or whatever the current year happens to be?

I've tried a few things, each more clunky than the last.

 

[Andrzejek]

Do you mean, convert the date in SQL? Do it in VBA? On paper?

You need to be more specific.

If VBA, you may try:
[tt]
Dim dt As Date
dt = CDate("02/01/1987")

MsgBox Month(dt) & Day(dt) & Year(Date)
[/tt]
Code not tested.

Have fun.

---- Andy

 

[PHV]

You wanted this ?
newDate=DateSerial(Year(Now()),Month(oldDate),Day(oldDate))

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886