Guardar cambios automáticamente, sin preguntar

[StephenQ]

Como te dije no funciona como yo lo quiero, pero ya encontre como hacerlo y es muy parecido al código que me enviaste, muchas gracias por los comentarios, por si alguien tiene la misma duda o algo por el estilo lo que encontre fue este código:

Sub Auto_Close()
'Mis intrucciones
ThisWorkbook.Save
End Sub

Y este se escribe en el ThisWorkbook

Un saludo