Thread: Modified Date
View Single Post
  #2   Report Post  
Frank Kabel
 
Posts: n/a
Default

Hi
use the following UDF (only on workbook level):


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
=DOCPROPS("last save time")
(format cell as date)

--
Regards
Frank Kabel
Frankfurt, Germany

DME wrote:
Is there a formula or a way to input the last date a file was
modified into a cell? I have a spreadsheet that many users will be
accessing but will not be able to change. I want them to be able to
see the last time the information was updated. I could manually type
in the date, but I know I may forget sometime, so I want a cell that
show the last modified date automatically. Is this possible or am I
crazy?

thanks for your help.