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 in a cell
=DOCPROPS("last author")
or
=DOCPROPS("last save time")

Signature
Regards
Frank Kabel
Frankfurt, Germany
> Good day,
>
[quoted text clipped - 12 lines]
> Best Regards
> Khawar