Bonjour à tous

J'ai un code qui ferme un fichier excel et doit normalement fermer excel egalement.
Seulement j'ai beau tourner le code dans tout les sens ça ne fonctionne pas correctement.

1er code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
Application.Quit
End sub
Celui ci ferme bien le classeur mais ne quitte pas excel.

2eme code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Application.DisplayAlerts = False
Application.Quit
Application.DisplayAlerts = True
End sub
celui la ferme le classeur et excel mais m'ouvre un message me demandant de sauvegarder ou pas le fichier malgres le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Application.DisplayAlerts = False
.

Car je veux fermer le fichier sans sauvegarder et quitter excel sans aucun message.

Si quelqu'un a une solution?

Merci