Mark,
You will need a UDF
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")
or
=DocProps ("last save time")
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Mark" wrote in message
...
I would like to find a way to insert the data that is stored on the
"Properties" page of an excel document into the cell. In work and Visio I
can
do it easily but I can't figure out how to do it in Excel. I know, it's
probably simple, but I just can't think that simple right now...
thanks
mark
|