Hi
you may use the following user defined function:
Function DocProps(prop As String)
On Error GoTo err_value
DocProps = ActiveWorkbook.BuiltinDocumentProperties (prop)
Exit Function
err_value:
DocProps = CVErr(xlErrValue)
End Function
Now you can use the following formula in one of your cells:
=DocProps("Last save time")
