Hello and Welcome to the Forum

You should be able to work with this code to get what you want;

http://www.excelforum.com/excel-prog...-workbook.html

It's Post #7 you'll need.

Remove the ThisWorkbook.Close statement in the code and it'll just save

Alternatively there is also the built in AutoSave function which may do the job just as well?

https://support.office.com/en-us/art...f-a80415b92f99