Discussion :

[Gualino]

Bonjour,

J'ai une méthode qui importe des valeurs depuis Excel dans mon application.

Quand je l'utilise, j'accumule des processus Excel dans mon gestionnaire des taches.

Et tant que je ne les ferme pas manuellement, les fichiers en question restent "verrouillé pour modification"...donc accessibles seulement en lecture seule.

Elle commence par:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
    xlapp = New excel.Application
 
            openfiledialog1.Filter = "Excel 2003 file|*.xls|Excel 2007-2010 file|*.xlsx"
            openfiledialog1.Title = "Import the geometry. Select a file"
 
            Call FillUpProgressBar(0.1) '                                                          Progressbar 10%
 
            openfiledialog1.ShowDialog()
            If openfiledialog1.FileName <> "" Then
 
                xlWorkBook = xlapp.Workbooks.Open(openfiledialog1.FileName)
 
                xlWorkSheet = CType(xlWorkBook.Worksheets(1), excel.Worksheet)

et finit par:

Code :

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

1
2
3
4
5
6
7
8
9
 
                xlWorkBook.Close()
                xlapp.Quit()
 
                releaseObject(xlapp)
                releaseObject(xlWorkBook)
                releaseObject(xlWorkSheet)
 
                GC.Collect()

Que manque t il dans le code de fin?

[tomlev]

Tu as vu cette question dans la FAQ ?

En quoi consiste ta méthode releaseObject ?

[Gualino]

Je ne vais jamais dans le C#, j'ai dejà du mal avec VB.NET....

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
#Region "Realease Objects"
    Private Sub releaseObject(ByVal obj As Object)
        Try
            System.Runtime.InteropServices.Marshal.ReleaseComObject(obj)
            obj = Nothing
        Catch ex As Exception
            obj = Nothing
        Finally
            GC.Collect()
        End Try
    End Sub
#End Region

J'ai modifié ainsi:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 xlWorkBook.Close()
                xlapp.Quit()
 
                releaseObject(xlapp)
                releaseObject(xlWorkBook)
                releaseObject(xlWorkSheet)
 
                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlapp)          System.Runtime.InteropServices.Marshal.ReleaseComObject(xlWorkBook)       System.Runtime.InteropServices.Marshal.ReleaseComObject(xlWorkSheet)
 
                GC.Collect()
                GC.WaitForPendingFinalizers()

Ai je encore besoin de releaseObject?

Et dois je appliquer ces méthodes au WorkBook et WorkSheet?

J'avoue utiliser ce code sans vraiment le comprendre...

[tomlev]

Plusieurs problèmes :

- ça ne sert à rien de refaire le ReleaseComObject, puisque tu l'as déjà fait dans releaseObject


- dans releaseObject, ça ne sert à rien de mettre obj à Nothing, ça modifie seulement la valeur du paramètre et pas la variable dans la méthode appelante. Mets le paramètre en ByRef au lieu de ByVal, ou alors mets la valeur à Nothing dans la méthode appelante et non dans releaseObject


- ne mets pas le GC.Collect dans releaseObject, ça provoque un cycle de GC à chaque appel, ce qui est très lourd. De toutes façons tu le fais déjà en dehors de releaseObject...

A part ça je ne vois pas trop... où sont définies tes variables xlapp, xlWorkBook et xlWorkSheet ? Ce sont des variables locales ou des champs de ta classe ?

[BenoitM]

si c'est juste pour lire toutes les celulles je trouve OleDb plus facile et moins lourd