Mike

User Defined Function, not built-in.

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

In a cell enter...........

=DOCPROPS("author")
or
=DOCPROPS("last save time")

Gord Dibben Excel MVP


On Thu, 30 Dec 2004 14:37:01 -0800, Mike on the learning curve! <Mike on the
learning wrote:

I just need to display the "author" from the file properties in a cell in the
worksheet of the same file!

Is this a function?
Thanks