fermer excel par application.quit

bonjour

D'apres certains posts, pour fermer excel
la command suffirait!:D

Code:

---

1 2	application.quit

---

fermerait l'application excel.

hors cela ne marche pas .

voici la totalite du code du bouton

Code:

---

1 2 3 4 5 6 7 8

Private Sub CommandButton8_Click() 'bouton FIN UserForm_initialize Unload UserForm1 ActiveWorkbook.Close SaveChanges:=True 'ferme le fichier actif Application.Quit 'quit excel End Sub

---

j'avoue que je suis un peu perdu :roll:

Bonjour,

Inverse les deux lignes de code suivantes :

Code:

---

1 2 3 4

Private Sub CommandButton8_Click() 'bouton FIN Application.Quit 'quit excel ActiveWorkbook.Close SaveChanges:=True 'ferme le fichier actif End Sub

---

merci

:king: