Button fermer et enregistrer

Bonjour le forum,

Private Sub CommandButton1_Click()
Unload Me
End Sub

Comment ajouter à cette commande un enregistrement du fichier mas sans le fermer. Cette à dire après le clique, l’userform ce ferme et enregistre le fichier.

J’ai fait de recherche j’ai trouvé le code ci-dessus mais ça fonctionne pas et en plus ça ferme le fichier.

Merci d’avance

Sub QUITTER()
Application.Quit
Workbooks(ActiveWorkbook.Name).Close SaveChanges:=False
End Sub

Pias