Discussion :

[Chris@Xerox]

Bonjour,

J'ai le problème suivant:

Je charge une feuille EXCEL dans un DATASET en VB.NET. Voici un bout de code qui montre comment je procède:

Code :

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

1
2
3
4
5
Conn1.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & TextBox1.Text & ";Extended Properties=Excel 8.0;"
Cmd.CommandText = "SELECT * FROM [" & ListBox1.Items(ListBox1.SelectedIndex) & "$]"
Cmd.Connection = Conn1
DataAdapt1 = New OleDbDataAdapter(Cmd)
DataAdapt1.Fill(Dataset1)

Ça fonctionne mais... Si dans une colonne de ma feuille se trouvent des données alphanumériques et numériques, les données numériques ne sont pas prises. Le fichier EXCEL ne peut être modifier car l'accès est en read-only et la quantité d'information (lignes et colonnes) du fichier EXCEL est variable. Y a-t-il un moyen de convertir toutes les données en type string lors du transfert en EXCEL et DATASET?

Merci.

[anonymousse]

bonsoir,

conversion avec CStr non ?

http://msdn.microsoft.com/fr-fr/libr...=vs.80%29.aspx

sinon, est-ce que ce n'est pas un problème de "," ou de "." dans tes formats numériques ?

[MABROUKI]

bonjour
Mets des en-tetes de colonnes dans tes feuilles (libelles de colonnes) pour qu'il traite en chaine (string) le contenu de tes colonnes.
Sans les en-tetes de colonnes si par exemple dans la feuille en cours on a :
-colonne 5 ,1ere ligne commence par 155,55
-toute la colonne sera reconnue chiffre et si plus bas il y des caracteres il seront ignores (caractere vide ou "").

Par contre si les colonnes ont des en-tetes Alpha ou Alphanumeriques toutes les colonnes seront traites au format standard excel et reconnues correctement.
Alors les en-tetes,svp...
bon code......

[Chris@Xerox]

Bonjour anonymousse et MABROUKI,

Merci pour vos réponses.

conversion avec CStr non ?

J'avais déjà essayé mais sans résultat. CStr n'est pas reconnu dans la requête SQL.

Mets des en-tetes de colonnes dans tes feuilles (libelles de colonnes) pour qu'il traite en chaine (string) le contenu de tes colonnes.

Malheureusement, toutes mes colonnes ont déjà des entêtes en alphanumérique. Les colonnes sont bien reconnues en string mais les valeurs numériques du fichier Excel ne sont pas importées. L'import refuse de convertir le numérique d'Excel en alphanumérique. Ce qui m'étonne mais bon...

Un autre idée?

Merci.

[Theze]

Bonjour,
Essai avec ceci, "HDR=YES" avec entêtes, "IMEX= 2" lecture/écriture :

Code :

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

1
2
 
Conn1.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & TextBox1.Text & ";Extended Properties=""Excel 8.0;HDR=YES;IMEX= 2;"""

Hervé.

[Chris@Xerox]

Bonjour Hervé,

Merci pour ta réponse. Ça ne fonctionne pas avec "IMEX=2".
Mais c'est parfait avec "IMEX=1".
Les champs numériques sont passés en alphanumériques.

Grace à toi j'ai pu trouver ceci sur le net:

"IMEX=1;" tells the driver to always read "intermixed" (numbers, dates, strings etc) data columns as text. Note that this option might affect excel sheet write access negative.

Merci et bonne journée.