how to know the original creator of one excel?

B

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 ("Author")
 
M

MartinW

Hi Bob,

Is that any different to going to File>Properties>Summary tab?
In other words, is there something hidden deeper in the file that
contains this info?

Regards
Martin
 
G

Gord Dibben

Martin.

Only difference is Bob's function will return the property to a cell.


Gord Dibben MS Excel MVP
 
Top