View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Rob Rob is offline
external usenet poster
 
Posts: 718
Default Auto run macro when file is saved

Hi,
Is there a way to auto run a macro everytime a file is saved? I am using the
code below to add a revision date into the footer. I need this to execute
every time the file is saved.
Thanks.

Function MyDate()
Application.Volatile
MyDate = FileDateTime(ThisWorkbook.FullName)
End Function

Sub setfooterfromrange()

With ActiveSheet.PageSetup
ActiveWorkbook.Save
.LeftFooter = "Revision Date: " & Format(Range("z64"), "Dddd, Mmmm dd,
yyyy, h:mm AM/PM")

End With