Discussion :

[jlqgigi]

Bonjour, dans mon applic' développée en VB.net, je copie des données à partir d'un fichier source Excel vers un autre fichier destination Excel (Devises.xlsx).
Le fichier source a été au préalable chargé à l'adresse

http://http://fr.exchange-rates.org/...R&iso_code=USD

Chargement et copie s'effectuent correctement, sauf que le format final a perdu le format d'origine (nombre à 5 décimales). Le format final devient un nombre entier 123456 au lieu de 1,23456

Le code:
SourceRange = wsExcelUSD.Range("B" & i, "B" & j)
DestRange = wsExcelDEV.Range("B" & LastRecLine)
SourceRange.Copy(DestRange)

où i et j sont respectivement les Nos de lignes début et fin à copier,
et LastRecLine est No de la ligne à partir de laquelle il faut coller.

Question: comment garder le format décimal (#,#####) du fichier source dans le fichier destination?

Merci de votre aide

[jlqgigi]

Bonsoir à tous,

Ayant passé plusieurs heures à chercher une solution, à la relecture de mon post je m'aperçois qu'il manque des informations capitales:
si le fichier source est un fichier Excel .xlsx normal il n'y a pas de problème. Or ici le fichier source téléchargé est enregistré sous Excel 2010 au format ".csv".
C'est là que réside l'origine du problème.
Une solution qui fonctionne hors VB.net (manuellement avec Excel 2010) est d'ouvrir le fichier source sous Excel puis de le réenregistrer avec SaveAs au format ".xlsx".

Bon maintenant comment réaliser cela en VB.net (VS2010)?
Allez les Experts! J'ai besoin de vos lumières. Ne m'abandonnez pas.

Merci