insert into a cell the last update

[Ramiro Cubillan]

how can i insert into a cell the last update of the document that I can see
in the statistic or MSDOS in the General Tap.

Regards,

Ramiro

 

[Frank Kabel]

Hi
use the following 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 for example in a cell (to get the last modification date)
=DOCPROPS("last save time")
(format cell as date)