How to display create date for the workbook in a cell.

[geniusideas]

Normally when we use =now() formula in excel it will show you current
date. This time I wanted to show prevoius modified or last save date
in a cell. What command or VBA code to be use. Anybody can help pls...

http://microsoft-excel-macro.blogspot.com

 

[Bob Phillips]

'-----------------------------------------------------------------
Function DocProps(prop As String)
'-----------------------------------------------------------------
Application.Volatile
On Error GoTo err_value
DocProps = ActiveWorkbook.BuiltinDocument­Properties(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

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)