You could put this in your ThisWorkbook Code module:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Save
End Sub


In article ,
jswalsh33 wrote:

For instance is there a macro code for saving the workbook
automatically on exit?