Display Document Editing Time in a Cell

Hi,

Is there any way to display the editing time of a document in a cell automatically?

Cheers.

Hi greaseebogus,

You need to have Macros enabled and have code similar to the following code in the 'ThisWorkbook' Module:

Please Login or Register  to view this content.

To enable Macros and to Run Macros see the following:
http://office.microsoft.com/en-us/ex...010031071.aspx
http://office.microsoft.com/en-us/ex...010014113.aspx
If help is still needed do a google search for 'youtube excel enable macro' and/or 'youtube excel run macro'.

To access Visual Basic (VBA) see:
http://www.ablebits.com/office-addin...a-macro-excel/

a. Click on any cell in the Excel Spreadsheet (may not be needed).
b. ALT-F11 to get to VBA.
c. CTRL-R to get project explorer (if it isn't already showing).
d. Double Click on a 'Module Name' in 'Project Explorer' to see code for that module.

Lewis

Hi Lewis,

Thanks for the reply - I should have clarified my question a bit better. I want to show the total document editing time, i.e. how many hours it has been worked on.
Not sure if there is a way to do this or not.

Cheers

Total document editing time is a lot more interesting.

See the attached file.
The Total file Edit Time will be updated in 3 places each time the file is saved:

a. Cell D1 in 'Sheet1' will display a last edited timestamp.
To change the Sheet, cell, or format of the time display, make modifications to Sub Workbook_BeforeSave() in 'ThisWorkbook' module.

b. In the Excel Files 'Custom Property' item 'Reference' in string 'hh:mm:ss' format. (This is the Master value).

c. In the Excel File 'Built In Property' item 'Total Editing Time' (in long integer MINUTES).
In Excel 2003, this item DOES NOT SEEM TO BE updated by Excel.
To acces 'Total Editing Time' in Excel 2003: File > Properties > Statistics

Please let me know if there are any problems, especially in versions of Excel other than 2003.

Lewis

Code follows (ThisWorkbook module)):

Please Login or Register  to view this content.