Thanks. That should work but how do I put that into VBA code? I think that's
where it needs to go to populate the default of the list box. Correct?

"Roger Govier" wrote:

Hi

Try
=TODAY()-WEEKDAY(TODAY())+2

--
Regards
Roger Govier



"Secret Squirrel" wrote in
message ...
I have a list box in cell A8. It's a list box created using data
validation.
The values are all dates. How do I get it to populate a default date when
opening the file?
The list of values is dates for every Monday so I want it to default to
the
current week's Monday. For example if today was 9/12/07 I would want it to
be
9/10/07 when the file is opened. How would I make this happen?