Timestamp a sheet

E

eluehmann

I would like to timestamp a sheet upon opening but I do not want th
date to change after it is initially stamped. Right now I am usin
today() but as you all know this gives teh day that you are a
currently. Any suggestions
 
J

jeff

Hi,

You can paste this into the ThisWorkbook module.

Private Sub Workbook_Open()
If Range("A1").Value = "" Then Range("A1") = Now()
End Sub

jeff
 
E

ElsiePOA

Put this code into the ThisWorkbook Module

Private Sub Workbook_Open()
Range("A1") = Date
End Sub

Change "A1" to whatever cell you want the timestamp in, and format th
cell to show the date as you want it
 
J

Jim May

ElsiePOA;
Wouldn't this code <<AS IS>> assign the current date each time the file was
opened?
 
Top