Bonjour,

Je cherche à exporter les enregistrements d'un fichier Excel vers une DataTable.
Cela marche correctement, mais dès qu'il y'a une centaine d'enregistrements dans le fichier excel, l'erreur
date oleaut illégale est générée.

Voici le code de ma fonction :
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
26
27
28
29
30
31
32
33
34
35
 
 Public Function GetDataTable(ByVal Colonne As String, ByVal Feuille As String)
 
        Try
            'ouverture connexion
            Me.open()
 
            'récupération des enregistrements 
 
 
                _MonAdapter = New OleDbDataAdapter("select " & Colonne & " from " & Feuille, _MaConnexion)
 
 
            Try
                'met à jours les lignes de _MonDataTable
 
                _MonAdapter.Fill(_MonDataTable)
            Catch e As Exception
                MsgBox(ex.Message)
            End Try
 
 
            'ferme la connexion
            Me.close()
            'destruction de l'objet
            _MonAdapter = Nothing
            _MonDataTableTaille = _MonDataTable.Rows.Count
 
            Return _MonDataTable
        Catch ex As Exception
            MsgBox("excel 4 " & ex.Message)
            Me.close()
            Return 0
        End Try
    End Function
Quelqu'un a t' il déjà été confronté a ce problème ?