Discussion :

[benaman2]

Bonjour,

J'ai postuler mon problème sous un autre forum, mais un Monsieur m'a conseillé de le poster ici. Donc j'espère de trouver ma solution ici

------
SVP, j’ai un problème sous VB6 que je n’arrive pas à le résoudre.
Je fais une importation d’une liste des produits depuis un fichier Excel vers une table Access.

L’importation ça marche mais il y a deux grands problèmes :

1. Si une cellule dans le fichier Excel est vide, alors toute la ligne sera ignoré lors de l’importation. C.à.d, si j’ai 5 lignes dans le fichier Excel, et une ligne comporte une cellule vide, je vais avoir seulement 4 lignes dans la table Access.
2. Un autre problème avec la virgule et le point, la valeur des prix ne s'affiche pas correctement, par exemple:

Dans le fichier Excel ==>Dans la Table Access==> Affichage MSHFlexGrid
734,40 ==> 734,4 ==>734.39999999999998 (14 chiffres avec le point)
305,20 ==> 305,2 ==> 305.199999999999999
241,37 ==>241,37 ==> 241.37

voila un capture d'écran pour l'affichage MSHFlexGrid




SVP, si vous avez des propositions, je serai reconnaissant.

[LeForestier]

Bonjour,

Je fais une importation d’une liste des produits depuis un fichier Excel vers une table Access

.
Pas bien compris, tu importe le fichier excel dans un fichier mdb, ensuite tu l'ouvre avec VB6 ?
Si oui, pourquoi pas ouvrir directement le fichier excel dans VB6 ?

Pour le MSHFlexGrid.. comment est-il rempli ? avec la BD ou par code.
A+

[benaman2]

Bonjour,

Pas bien compris, tu importe le fichier excel dans un fichier mdb, ensuite tu l'ouvre avec VB6 ?
Si oui, pourquoi pas ouvrir directement le fichier excel dans VB6 ?

Oui, j'importe le fichier excel dans une table Access, je fais cette opération seulement lorsque il y a une mise a jours des produits. mais l'application travaille toujours avec la BD.

Pour le MSHFlexGrid.. comment est-il rempli ? avec la BD ou par code.

voila le code que j'utilise pour remplir la MSHFlexGrid

Code :

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

1
2
 requette.Open "listeProduit", Conn, adOpenKeyset, adLockOptimistic
    Set MSHFlexGrid1.DataSource = requette

listeProduit: est une requette dans la BD Access.

Merci

[LeForestier]

Re,
C'est surtout ta réponse 2 qui importait, au départ de la requète je ne vois pas de solution, mon avis, après la requète passer en revue toute les cellules du grid et les modifier avec Round()
A+

[benaman2]

mais les prix sont correctes dans la BD Access ???

[LeForestier]

Bien sûr, mais c'est inhérant à la transposition (et connu) et il n'y a rien à faire d'autre