Closing the workbook & saving automatically

Once the workbook has been saved you can use this, it goes into the workbook module

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True


End Sub

You can set up the workbook to be read only in the tools options, and then use a password if you want to modify the workbook....