Show last edited by

[Dave H]

Is there a way to see who edited an excel file last? If you use windows
explorer and look at the properties of an excel file you can see the
last modified date you can also see who the original author is. I
would like to see who made the last modifications.

 

[Bob Phillips]

'-----------------------------------------------------------------
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")

--
HTH

Bob Phillips

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

 

[Dave H]

This works great. Thanks

'-----------------------------------------------------------------
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")

--
HTH

Bob Phillips

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