Discussion :

[Yolak]

Bonjour.

J'ai fait un programme qui nécessite d'utiliser un classeur excel pour faire un publipostage avec word ensuite.

Le problème, c'est quand on quitte mon appli, Excel existe toujours dans le gestionnaire des tâches.

J'ai parcouru le forum et les FAQ mais même avec toutes les méthodes que j'ai trouvé, je n'y arrive pas.

J'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    Public Function KillProcess(ByVal ProcessName As String) As Boolean
        Dim svc As Object
        Dim sQuery As String
        Dim oproc
        svc = GetObject("winmgmts:root\cimv2")
        sQuery = "select * from win32_process where name='" & ProcessName & "'"
        For Each oproc In svc.execquery(sQuery)
            oproc.Terminate()
        Next
        svc = Nothing
    End Function

puis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

KillProcess("EXCEL.exe")

Ce qui marche très bien avec Word d'ailleurs mais pas avec Excel !!!

Ensuite j'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
                Dim w As Excel.Workbook
                For Each w In appExcel.Workbooks
                    w.Saved = True
                Next
                appExcel.Quit()

appExcel est déclaré plus haut dans mon code
Ca ne fonctionne pas non plus...

Ensuite j'ai tenté de libérer les ressources avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

appExcel = Nothing

Et ça ne marche pas non plus !

Merci de m'aider s'il vous plaît!

Yoyo!

[Yolak]

J'ai résolu mon problème...

C'était une erreur de ma part !!!

J'ai deux fenêtre qui peuvent m'ouvrir Excel, je tapait mon code dans une et je testait dans l'autre !!!

Désolé d'avoir pollué le forum

[Skalp]

Tu peux même délester ton post !