j'ai un petit probleme, j'ai fait une fonction qui lit un fichier excel,
le probleme c'est que je me rend compte qu'il me prend la premiere ligne en
temps que nom de colonne, et je la perd ... j'ai essayer de relir les nom de
colonne en me disant, sa fais rien je reprend les nom de colonne et je le
replace dans la premiere ligne, maissi un colonne de la premiere ligne
contient du numerique il marque 'F' et un numero derrier (un numero
sequentiell, et pa le numero qui ce trouve dans kla cellulle) idem pour les
nom, il prend le premier mot.
est ce que qq connaitrai le moyen de lui passer un parametre pour lui fair
comprendre que la premiere ligne n'es pas les entetes de colonnes ?
merci
dieudonne sebastien
info at europenv point com
'-------------------------------------------
Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
Dim lRetour(0, 0) As Object
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=" & pChemin & "; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [" & pNomFeuille & "$]", MyConnection)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Sebastien
j'ai rajouter la proprieter HDR=No mais une fois cela fais , impossible d'executer cette ligne MyCommand.Fill(DS)
je pense qu'il n'arrive plus a recupairer le schema, donc j'ai essayer de le fair moi meme, mais impossible, meme une fois le schema rajouter avec table.add et column.add il refuse ... je comprend plus ...
si qq a une solution merci
"Sebastien" a écrit dans le message de news: 41b9a56e$0$1299$
Bonjour,
j'ai un petit probleme, j'ai fait une fonction qui lit un fichier excel, le probleme c'est que je me rend compte qu'il me prend la premiere ligne en temps que nom de colonne, et je la perd ... j'ai essayer de relir les nom de colonne en me disant, sa fais rien je reprend les nom de colonne et je le replace dans la premiere ligne, maissi un colonne de la premiere ligne contient du numerique il marque 'F' et un numero derrier (un numero sequentiell, et pa le numero qui ce trouve dans kla cellulle) idem pour les nom, il prend le premier mot.
est ce que qq connaitrai le moyen de lui passer un parametre pour lui fair comprendre que la premiere ligne n'es pas les entetes de colonnes ? merci dieudonne sebastien info at europenv point com
'-------------------------------------------
Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
Dim lRetour(0, 0) As Object
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=" & pChemin & "; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [" & pNomFeuille & "$]", MyConnection)
DS = New System.Data.DataSet
MyCommand.Fill(DS)
Dim lFeuilleExcel As DataTable
lFeuilleExcel = DS.Tables(0)
Dim lLigneExcel As DataRow
Dim lStr As String
Dim lCompteur As Long = 0
Dim lNB_Ligne As Long
Dim lNB_Colonne As Long
'--------------------------------------------
j'ai rajouter la proprieter HDR=No mais une fois cela fais , impossible
d'executer cette ligne
MyCommand.Fill(DS)
je pense qu'il n'arrive plus a recupairer le schema, donc j'ai essayer de le
fair moi meme, mais impossible, meme une fois le schema rajouter avec
table.add et column.add il refuse ... je comprend plus ...
si qq a une solution merci
"Sebastien" <info@nospam.europenv.com> a écrit dans le message de news:
41b9a56e$0$1299$636a15ce@news.free.fr...
Bonjour,
j'ai un petit probleme, j'ai fait une fonction qui lit un fichier excel,
le probleme c'est que je me rend compte qu'il me prend la premiere ligne
en temps que nom de colonne, et je la perd ... j'ai essayer de relir les
nom de colonne en me disant, sa fais rien je reprend les nom de colonne et
je le replace dans la premiere ligne, maissi un colonne de la premiere
ligne contient du numerique il marque 'F' et un numero derrier (un numero
sequentiell, et pa le numero qui ce trouve dans kla cellulle) idem pour
les nom, il prend le premier mot.
est ce que qq connaitrai le moyen de lui passer un parametre pour lui fair
comprendre que la premiere ligne n'es pas les entetes de colonnes ?
merci
dieudonne sebastien
info at europenv point com
'-------------------------------------------
Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
Dim lRetour(0, 0) As Object
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=" & pChemin & "; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [" & pNomFeuille & "$]", MyConnection)
j'ai rajouter la proprieter HDR=No mais une fois cela fais , impossible d'executer cette ligne MyCommand.Fill(DS)
je pense qu'il n'arrive plus a recupairer le schema, donc j'ai essayer de le fair moi meme, mais impossible, meme une fois le schema rajouter avec table.add et column.add il refuse ... je comprend plus ...
si qq a une solution merci
"Sebastien" a écrit dans le message de news: 41b9a56e$0$1299$
Bonjour,
j'ai un petit probleme, j'ai fait une fonction qui lit un fichier excel, le probleme c'est que je me rend compte qu'il me prend la premiere ligne en temps que nom de colonne, et je la perd ... j'ai essayer de relir les nom de colonne en me disant, sa fais rien je reprend les nom de colonne et je le replace dans la premiere ligne, maissi un colonne de la premiere ligne contient du numerique il marque 'F' et un numero derrier (un numero sequentiell, et pa le numero qui ce trouve dans kla cellulle) idem pour les nom, il prend le premier mot.
est ce que qq connaitrai le moyen de lui passer un parametre pour lui fair comprendre que la premiere ligne n'es pas les entetes de colonnes ? merci dieudonne sebastien info at europenv point com
'-------------------------------------------
Dim DS As System.Data.DataSet
Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
Dim MyConnection As System.Data.OleDb.OleDbConnection
Dim lRetour(0, 0) As Object
MyConnection = New System.Data.OleDb.OleDbConnection( _
"provider=Microsoft.Jet.OLEDB.4.0; " & _
"data source=" & pChemin & "; " & _
"Extended Properties=Excel 8.0;")
' Select the data from Sheet1 of the workbook.
MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
"select * from [" & pNomFeuille & "$]", MyConnection)
