range("A1").Value = date
range("A2").Value = date - 7

Tritan

-----Original Message-----
Hi,

I am very new to both Excel and VBA. How do I set a cell
to default to today's date, and another cell to default
to
7 days before today?

Thanks,
C.M.
.