Bonjour à tous,
je travaille sur un pg qui a pour but de transferer des données d'une base de données access dans un classeur excel.
Pour recuperer un prix, j'utilise le code suivant:
le probleme, c'est qu'il me renvoie une valeur avec 4 décimales mais arrondie à deux chiffres aprés la virgule!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 monExcel.ActiveWorkbook.ActiveSheet.Range("G" & ind).NumberFormat = "#,##0.0000 [$-1];[Red]-#,##0.0000 [$-1]" monExcel.ActiveWorkbook.ActiveSheet.Range("G" & ind).Value = rsconso.Fields("couthtva").Value
ex: 1,1127 me renvoie 1,1200
Pourriez-vous m'expliquer pourquoi et comment y remedier?
J'ai egalement passé le format des cellules concernées dans excel à 4 chiffres aprés la virgule, rien n'y fait
merci pour votre aide![/code]
Partager