Bonsoir,

Je viens vous voir car j'ai un problème quant à la fermeture d'une feuille Excel via VB6.

En effet, lorsque j'exécute mon code, le processus Excel.exe reste dans la table des processus...

Voila mon code :

Code Visual Basic :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub BP_Valider_Click()
    Dim fichierExcel
    Dim wbExcel
    Dim i As Integer
 
 
    chemin = App.Path + "\BDGesport.accdb"
    Set base = OpenDatabase(chemin)
 
    Set fichierExcel = New Excel.Application
 
    fichierExcel.Workbooks.Open ES_LienFichier.Text
    Set wbExcel = fichierExcel.ActiveWorkbook
 
    For i = 1 To 3
        'List1.AddItem wbExcel.Worksheets(1).Range("A1").Value
    Next i
 
    fichierExcel.Quit
 
    Set wbExcel = Nothing
    Set fichierExcel = Nothing
 
    base.Close
End Sub


Seulement cette erreur n'apparait que lorsque la ligne :
Code Visual Basic :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
List1.AddItem wbExcel.Worksheets(1).Range("A1").Value

n'est plus en commentaire. Je me posais donc la question que cette ligne crée peut être une référence vers l'objet de type Excel Application ce qui ferait que le garbage collector ne supprime pas l'objet.

Auriez-vous une idée d'où pourrez venir le problème et/ou de comment le résoudre s'il vous plait ?

Merci beaucoup à vous d'avance et je vous souhaite de passer une excellente soirée !