Subtract a year

[Walter]

When you enter a month and day in a control(short date) Access assumes the
current year. This works great except in January if you're entering December
records. I would like to subtract a year if the assumed date is greater than
today in the BeforeUpdate Event. I've tried Me.TripDate = DateAdd("yyyy",
-1, [TripDate]) but get an error message that says this is preventing update.
The control then shows the month and day with no year.

 

[Allen Browne]

Walter, see if this helps:
Intelligent handling of dates at the start of a calendar year
at:
http://allenbrowne.com/func-AdjustDateForYear.html

 

[Walter]

I haven't tried it yet but it looks like just what I'm looking for.
--
Thanks for your help!
Walter

Walter, see if this helps:
Intelligent handling of dates at the start of a calendar year
at:
http://allenbrowne.com/func-AdjustDateForYear.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia

Reply to group, rather than allenbrowne at mvps dot org.

When you enter a month and day in a control(short date) Access assumes the
current year. This works great except in January if you're entering
December
records. I would like to subtract a year if the assumed date is greater
than
today in the BeforeUpdate Event. I've tried Me.TripDate = DateAdd("yyyy",
-1, [TripDate]) but get an error message that says this is preventing
update.
The control then shows the month and day with no year.