VBA: Quitter Excel

[padilla]

Bonjour,
Après exécution d'une macro, j'essaie de quitter Excel en cliquant sur un bouton.
La procédure associée au bouton fait
---
ThisWorkbook.Close Savechanges:=False
Application.Quit
---
Le classeur en cours (le seul à ce moment là) est bien fermé,
mais Excel reste obstinément ouvert, fenêtre vide bien sûr.
Je suis donc obligé de fermer Excel par Fichier/Quitter.

(je débute en VBA pour Excel, mais je suis un (vieux) programmeur
en plusieurs langages ;-))
Merci pour toute piste.

 

[zon]

Salut Padilla

Application.quit ferme bien Excel, le code suivant fonctionne sous Excel 2000
'à mettre dans This Worbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Activeworkbook.close savechanges:=false
Application.Quit



End Sub

 

[padilla]

Problème résolu

Excellent !
ça fonctionne effectivement dans Workbook_BeforeClose
Pour ma première question sur ce forum, je suis gâté !
Grand merci à zon pour son efficacité.