Bonjour,
Dans ce morceau de code, je sauvegarde une feuille de dossier Excel sous le nom de "DocFus.xls".
J'ouvre un document Word contenant une macro pour fusionner avec DocFus.xls.
Je quitte le Document Word, je retombe dans Excel que je ferme.
Tout va apparamment bien sauf que
je retouve un EXCEL dans la liste des processus actifs
et dans l'explorateur de projets, une liste de "VBAprojet (Docfus.xls) "qui s'allonge à chaque essai.
Cette liste disparait si je supprime manuellement EXCEL de la liste des processus actifs.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Application.DisplayAlerts = False
            Worksheets("Fusion").Unprotect (motpasse)
            Worksheets("Fusion").Copy
            ActiveWorkbook.SaveAs (Chemin & "\DocFus.xls")
 
            Set AppWord = CreateObject("Word.Application")
            AppWord.Visible = True
 
            Set FusWord = AppWord.Documents.Open(FileName:=NomMat)
 
            Workbooks.Close
            Excel.Application.Quit
Il y a sans doute des erreurs là dedans (je progresse lentement).
J'ai fait beaucoup d'essais, des .Close, .Quit, .Disconect
EXCEL est toujours là.
Merci de votre aide
Michel