Re: Inserting the date that an excel sheet is saved into a cell

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

From: Bob Phillips (bob.phillips_at_notheretiscali.co.uk)
Date: 01/06/05 

Date: Thu, 6 Jan 2005 18:53:00 -0000

You will need a UDF

Function DocProps(prop As String)
  application.volatile
  On Error GoTo err_value
  DocProps = ActiveWorkbook.BuiltinDocumentProperties _
  (prop)
  Exit Function
err_value:
  DocProps = CVErr(xlErrValue)
End Function
and enter

in a cell such as
=DocProps ("last author") for the author
or
=DocProps ("last save time") for the last saved date, format the cell as
date 

-- 
HTH
RP
(remove nothere from the email address if mailing direct)
"sharock" <sharock@discussions.microsoft.com> wrote in message
news:3F96AEFE-A2EE-4AF1-8FDE-5D1E6636A38D@microsoft.com...
> I need to insert the last saved (last updated) date into my excel ***.
Is
> there a way to do this?  It can be done in MS Project and MS Word.
Quantcast