Bonjour, comment pourrais-je forcer la fermeture d'excel, sachant qu'un

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
    xlBook.Close
    xlApp.Quit
    Set xlBook = Nothing
    Set xlApp = Nothing
ne marche pas... Enfin ca marche, mais une fois sur 100 et encore... Donc bon si il y avait un auter moyen, car sinon, je me retrouve avec vite 10/15 excel d'ouvert, mon programme sait plus trop ou donner de la tête, il ouvre le fichier que je lui aid it d'ouvrire, mais lit les données comme si c'était celui d'avant (le premier ouvert en fait) etc... Autant moi ca me gene pas je fais un chti ctrl alt suppr, mais bon à la base ce que je fais c'est pas pour moi et j'imagine mal mes utilisateurs killer Excel à la main toute les 10min...

P.S.: déclaration de xlBook et xlApp :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.Open(Emplacement)