Thread: Save Date
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
T Lavedas T Lavedas is offline
external usenet poster
 
Posts: 38
Default Save Date

On May 8, 3:40 pm, Marty wrote:
How can I update the value in a cell that represents the last date the
workbook was saved?


Try saving this in the code section of the ThisWorkbook object ...

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
ActiveWorkbook.Worksheets(1).Range("A2").Value = Now()
End Sub


Adjust the location to suit.

HTH,

Tom Lavedas
===========
http://members.cox.net/tglbatch/wsh/