This formular in code may work

1_yr_before = DateSerial(Year(Now()) - 1, Month(Now()), Day(Now()))

yc
"Nigel" wrote in message
...
I have looked and I know it must be eady but I want to subtract 1 year from
todays date in code, so I tried date-1 year but to no avail, I can use
date-365 but I would like it to automatically take into account leap years

Thanks