Locking =Today() on Save as on Template

[Ross Thomson]

Hi Folks,
I have a Excel Template with a =today() cell to show todays date when
opened - but would like have the date shown when the file was saved, not
todays date?

 

[Mike H]

Hi,

Use

Ctrl+;

which gives a non-volatile date.

Mike

 

[David Biddulph]

Control semi-colon

 

[Gord Dibben]

Private Sub Workbook_BeforeSave(ByVal SaveAsUI _
As Boolean, Cancel As Boolean)
If ThisWorkbook.Path = "" Then
Sheets("Sheet1").Range("A1").Value = "Last Saved On " & _
Format(Date, "mm/dd/yyy")
End Sub

Placed in Thisworkbook module of the Template which I assume is a true *.XLT
template


Gord Dibben MS Excel MVP

 

[Gord Dibben]

Forgot the End If

End If
End Sub


Gord

Private Sub Workbook_BeforeSave(ByVal SaveAsUI _
As Boolean, Cancel As Boolean)
If ThisWorkbook.Path = "" Then
Sheets("Sheet1").Range("A1").Value = "Last Saved On " & _
Format(Date, "mm/dd/yyy")
End Sub

Placed in Thisworkbook module of the Template which I assume is a true *.XLT
template


Gord Dibben MS Excel MVP

 

[Ross Thomson]

Thanks Folks, - works a treat
Ya saved my bacon