You mean to tell us that you got the hard part down and you couldn't figure
out the easy part???
You just need to tack on the filter for dates... something like
WHERE ...
AND Year([DateField]) = Year(Date())
--
Message posted via
http://www.accessmonster.com