How do you automatically record a revision date

J

jerry

Hi,
Whenever a worksheet is revised I need to automatically record a new revision date. The next time the worksheet is edited a new date automatically replaces the old date.
Thanks for the help,
jerry
 
S

SidBord

And that's a bad thing?? I don't get the picture. Ideally
what you want is a column of revision dates?? It seems
that what you want to do is to show the most recent
revision date if it's recorded in only one place. What
good is an old revision date. As you can see I just don't
understand.
-----Original Message-----
Hi,
Whenever a worksheet is revised I need to automatically
Click to expand...
record a new revision date. The next time the worksheet is
edited a new date automatically replaces the old date.
 
F

Frank Kabel

Hi
use the following 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
=DOCPROPS("last save time")
(format as date)

--
Regards
Frank Kabel
Frankfurt, Germany

jerry said:
Hi,
Whenever a worksheet is revised I need to automatically record a new
Click to expand...
revision date. The next time the worksheet is edited a new date
automatically replaces the old date.
 
A

Andy Wiggins

Look at:

File > Properties : Statistics

This includes the date the file was last modified.

--
Regards
Andy Wiggins
www.BygSoftware.com
Home of "Save and BackUp",
"The Excel Auditor" and "Byg Tools for VBA"



jerry said:
Hi,
Whenever a worksheet is revised I need to automatically record a new
Click to expand...
revision date. The next time the worksheet is edited a new date
automatically replaces the old date.
 
Top