View Single Post
  #3   Report Post  
Frank Kabel
 
Posts: n/a
Default

Hi
use the following UDF (only on workbook level):


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 cell as date)



"Steve J. Vaughan" wrote:

I would like to have the date that the spreadsheet was edited (last saved) in
an Excel cell.
If I use the =now() this will get updated when the spreasheet is viewed.
There is a variable as the date that the spreadsheet is saved can be view in
an explorer window.