Change "Creation Date" to "last save time"


Gord Dibben MS Excel MVP

On Wed, 9 May 2007 10:50:03 -0700, Mrs. C. <Mrs.
wrote:

Hi,

I used the following (provided by "Kjell Forssen" in another question.

Sub GetCreateDate()
If InStr(1, ActiveWorkbook.FullName, "\") = 0 Then
MsgBox "You must save the workbook first"
Exit Sub
End If
ActiveCell.Value = ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
End Sub

It worked beautifully, but it shows the "created date" on the Statistics
tab. I need to show the "created date" on the General tab. It's to be used
in a template and I want the date that shows to be the date each time the
template is used and "saved-as".

Thanks for the help!
Regards,
Lynda