Static date auto entry

[ritagail]

Hello Excel World,

I have a workbook full of templates and when the workbook is opened I would like for the date field (cell d4) to auto enter a static (one that does not change) into the cell. Can someone please help the code to do this. I can get the date to populate but it changes to the current date each time the workbook is opened. After wasting a day trying to get this on my own I am turning to the true guru's!

Thank you!

 

[Rick Rothstein]

Hello Excel World,

I have a workbook full of templates and when the workbook is opened I would like for the date field (cell d4) to auto enter a static (one that does not change) into the cell. Can someone please help the code to do this. I can get the date to populate but it changes to the current date each time the workbook is opened. After wasting a day trying to get this on my own I am turning to the true guru's!

You would need to test the cell first to see if it was empty or not...

If Sheets("Sheet1").Range("D4") = "" Then Sheets("Sheet1").Range("D4").Value = Date

Note: You did not say what sheet the cell D4 was on, so I assumed Sheet1 in my example above.