Just look at ActiveWorkbook.Saved

If true, then the workbook has been saved. If false, then it has not.

Note: You can set it to be true ... so the user can close the workbook without saving. That's rarely wanted or needed ... but it's sometimes useful.