Automatically adding today's date, but not updating when ope

[Rainbow]

Hi there.
I'm not sure if this can be done, but I thought I would ask.

I would like cell in D2 to add todays date when any text is entered into Colum A2 and not have that date update the next time I open the worksheet.

When I use =TODAY() the cell will update when ever I open the workbook.

Also I would like F2 to calculate 6 weeks from a date that I enter into E2 and change the entire row Yellow when that date is reached.

 

[ljtong]

Most obvious thing to me at the moment:

Private Sub Woorksheet_Change(ByVal Target As Range)

should be

Private Sub Worksheet_Change(ByVal Target As Range)

 

[Rainbow]

Well that seemed to fix it.

Thanks for all the help and the keen proofreading skills.