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

Signature
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
> 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.
Dave H - 13 Jun 2006 16:13 GMT
This works great. Thanks
Bob Phillips Wrote:
> '-----------------------------------------------------------------
> Function DocProps(prop As String)
[quoted text clipped - 20 lines]
> --
> Dave H[/color
--
Dave H