'-----------------------------------------------------------------
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")
or
=DocProps ("last save time")


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Curious" wrote in message
...
Is there a formula that displays the date the file was last modified. I
would like a formula similar to the =now() function, except it displays
the
date the file was last modified (as shown in properties).
Thanks