View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
Marie Bayes Marie Bayes is offline
external usenet poster
 
Posts: 84
Default How can I capture the last date a file was saved in the footer

Hi Mike

Can I jump in on this thread? I'd like to do exactly this, but also put
alongside the username of who last saved the document. Do you have any VB
code that will let me put that in please?

Thanks
--
Marie Bayes


"Mike H" wrote:

Try this

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Sheet1").Range("A1").Value = Date
End Sub

Alt+F11 to open VB editor
double click This Workbook
Paste code in

Mike

"DNader" wrote:

I'm looking for a way to capture the date a file was last updated in an Excel
spreadsheet. If a file was last updated 3 days ago, I want to see that date,
not the date the file was printed.