I don't think you need VBA for this. Conditional Formatting should take care
of it. Check it out in Help. Select A1, then Format/Conditional Formatting,
Format Is

=IF(AND(B1="",TODAY()-A1120))

Then select the format you want for overdue items.


On 23 Mar 2005 17:57:24 -0800, wrote:

Hello,
I'm asking for vba code (or resources on the web) that will help with
the following:

When a date is entered in cell a1, I would like excel to calculate if
that date was 120 days ago from TODAY(). If it wasn't, leave the cell
format alone. If it was, change the background color (to notify me the
item is overdue) until a date is entered in b1. When a date is entered
in b1, remove background color from a1 (to notify me that the item has
been checked-in).

Thanks for any help,
Russ