Discussion :

[akli_agha]

Bonjour à tous (tes)

En essayant de récupérer des codes alphanumériques à partir d'un classeur Excel via ADO dans une appli Delphi, je ne trouve pas la même info que sur le classeur.
Voici un exemple :

Sur la feuille Excel : e :=3.18173E+12

Et lors de la lecture dans mon appli Delphi, j'ai cette valeur : 3.1817300594e+012

Et je voudrais bien convertir cette valeur en décimal, car, en fait, elle représente un code à barre.

Merci bcp.

Outils : Win10, Delphi 7, ADO, Excel 2007, Firebird 2.5

[ShaiLeTroll]

ADO ou OLE, il y a des différences de valeur (précison, langue local ou langue systeme, ...)

Dans le fichier Excel, la valeur exprimée en exponent est inexploitable, est-ce que la donnée est complète si sur Excel, tu forces un format numérique sur 13 caractères
Un numérique de 13 caractères en ADO ou OLE, pas sûr qu'il retourne un Int64 correctement donc je privilégierais une transformation de la colonne en texte pour importer ce catalogue de EAN13

Sinon, parfois, il est plus simple depuis Excel d'exporter un CSV et d'importer ce dernier, c'est nettement plus rapide
La conversion peut se faire par programmation via un SaveAs mais le changement de format de colonne est un peu plus délicat, si ce fichier Excel est importé toujours par tes soins, tu peux donc faire ça manuellement.

[SergioMaster]

Bonjour

Sur la feuille Excel : e :=3.18173E+12
Et je voudrais bien convertir cette valeur en décimal, car, en fait, elle représente un code à barre.

J'ai déjà eu une expérience semblable avec un fichier venant de GS1, bien que ce ne fut pas sur le code barre GS1 lui même mais sur la référence interne entreprise (elle aussi en 13 chiffres)
Il me fut impossible de récupéré le dit chiffre et j'ai été obligé de modifier la codeification de la référence interne chez GS1 (en fait ma référence interne contient désormais un groupe de lettre au début) ainsi Excel (qui pour moi est le coupable) interprète dorénavant la colonne comme étant texte.

Il y a certainement une option quelque part qui forcerait Excel a interpréter correctement l'exponentielle sans perte de précision mais une chose est sûre cela ne vient pas de ADO, ni de ce que j'ai utilisé lors de cette expérience malheureuse à savoir : CDATA Firedac Excel xlsx (excellent malgré quelques petits désagréments à cause des mises en page : multilignes de certaines colonnes ou colorations de lignes paires/impaires)

une solution à essayer une formule dans le tableau =CONCATENATE(cellule) ou =TEXT(cellule, "0") ... à vérifier

[popo]

J'ignore si ça peut apporter un début de solution mais pour qu'Excel considère un chiffre comme du texte, il faut lui mettre un simple quote au début.
0123456 => deviendra 123456
'0123456 => restera 0123456

[SergioMaster]

J'ignore si ça peut apporter un début de solution mais pour qu'Excel considère un chiffre comme du texte, il faut lui mettre un simple quote au début.

Dans mon cas, le fichier xlsx était une remontée de GS1 donc c'était déjà trop tard (d'où ma correction de tout le fichier, quelques milliers de codes quand même, avec un groupe de lettre au début)

à l'époque je n'ai pas cherché plus loin et donc pas tester les deux formules citées, j'ai peur qu'il y ait perte de précision quand même mais faut voir !

[anapurna]

salut

en forçant simplement la cellule en format texte tout les donnée fournis reste en format texte
par-contre si tu laisse la cellule en standard il converti implicitement en chiffre

[Anselme45]

Et je voudrais bien convertir cette valeur en décimal, car, en fait, elle représente un code à barre.

S'il s'agit de codes-barres, il ne faut pas les traiter dans Delphi comme des "valeur en decimal" (que je suppose être un integer), mais comme un string (une chaîne de x caractères)

[akli_agha]

Pbm résolu. Merci pour vos interventions.

En fait, il fallait formater en texte mais pas dans le menu contextuel Format de cellule mais, plutôt, dans le groupe Données|Convertir ... ! Là, les cellules sont restées telles qu'elles et aucune conversion n'est faite.

Je ne comprends pas cette différence !!