Discussion :

[Shennong]

Bonjour à tous !

J'aimerai vous soumettre un petit problème, qui m'empêche de boucler une application.


Voilà le topo, j'ai un datagridview dans lequel j'importe les données d'un fichier excel. Cela fonctionne très bien pour tous les fichiers qui seront utilisés par les utilisateurs, sauf 1 !
Le problème étant qu'une fois le datagridview remplit, des données sont manquantes uniquement dans la première colonne, et impossible de comprendre le pourquoi du comment.

Voici le code utilisé pour charger les données :

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
 
  Dim MyConnection_source As System.Data.OleDb.OleDbConnection
            Dim DtSet_source As System.Data.DataSet
            Dim MyCommand_source As System.Data.OleDb.OleDbDataAdapter
 
            If txt_source.Text.EndsWith(".xls") Then
 
                MyConnection_source = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & txt_source.Text & ";Extended Properties=Excel 8.0;")
                MyCommand_source = New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM [Feuil1$]", MyConnection_source)
                MyCommand_source.TableMappings.Add("Table", "LABEO")
                DtSet_source = New System.Data.DataSet
                MyCommand_source.Fill(DtSet_source)
                data_source.DataSource = DtSet_source.Tables(0)
                MyConnection_source.Close()
 
            ElseIf txt_source.Text.EndsWith(".xlsx") Then
 
                MyConnection_source = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & txt_source.Text & ";Extended Properties=Excel 12.0;")
                MyCommand_source = New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM [Feuil1$]", MyConnection_source)
                MyCommand_source.TableMappings.Add("Table", "LABEO")
                DtSet_source = New System.Data.DataSet
                MyCommand_source.Fill(DtSet_source)
                data_source.DataSource = DtSet_source.Tables(0)
                MyConnection_source.Close()
 
End If

Voici un aperçu de la première colonne dan le fichier excel :



Et voici ce que j'obtiens dans le datagridview :



Tous les codes avec une lettre au début ne sont pas affichés. Seulement ceux avec un nombre ou un chiffre sont présents.

Si quelqu'un a une idée, je suis preneur !

Merci à vous.

Cordialement-