Time Date Last Modified
 

I am sharing a worksheet with another person and we both are updating it
often throughout the day. I'd like to have a cell display the last time and
date it was modified. Can this be done? Thanks, Diane

Only by using VBA


http://tinyurl.com/apq8b

Regards,

Peo Sjoblom

"LDL" wrote:

I am sharing a worksheet with another person and we both are updating it
often throughout the day. I'd like to have a cell display the last time and
date it was modified. Can this be done? Thanks, Diane

Here is an 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

Now you can use the following formula in one of your cells:
=DocProps("Last save time")

Obviously, the file has to have been saved.

--

HTH

Bob Phillips

"LDL" wrote in message
...
I am sharing a worksheet with another person and we both are updating it
often throughout the day. I'd like to have a cell display the last time
and
date it was modified. Can this be done? Thanks, Diane

Peo and Bob, Thank you both for your responses. Diane

"Bob Phillips" wrote in message
...
Here is an 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

Now you can use the following formula in one of your cells:
=DocProps("Last save time")

Obviously, the file has to have been saved.

--

HTH

Bob Phillips

"LDL" wrote in message
...
I am sharing a worksheet with another person and we both are updating it
often throughout the day. I'd like to have a cell display the last time
and
date it was modified. Can this be done? Thanks, Diane