The following will return the date that is a year ago from today. Adjust as
needed.

Sub DisplayYrAgo()
Dim YearAgo As Date

YearAgo = DateSerial(Year(Now()) - 1, Month(Now()), Day(Now()))
MsgBox YearAgo
End Sub


"mike" wrote:

hi guys

i need your help again!

i have a macro which looks for specific names in column A and then copies
them to a new sheet.
i now need to write it so that it searches for a date in column C that is a
year ago from today.
any suggestions?

thanks

mike