View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Quin Quin is offline
external usenet poster
 
Posts: 37
Default Last save data placed in Footer?

I found this simple code (below) to place the date and time my file was last
saved into cell "A1". I like it a lot, but now I need to put the date and
time the file was last saved into the center section of a footer. How do I
specify that placement?

Quin



Private Sub Workbook_Beforesave(ByVal saveasiu As Boolean, Cancel As Boolean)

Sheets(1).Range("A1").Value = Now

End Sub