how can i adapt the following macro to run when you exit
the workbook instead of when i save.

Sub BUandSave2()
Application.DisplayAlerts = False
ActiveWorkbook.SaveCopyAs
Filename:="T:\Invoices\Batch Book" & _
ActiveWorkbook.Name
ActiveWorkbook.Save
Application.DisplayAlerts = True
End Sub


thanks

mark