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:

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
le probleme, c'est qu'il me renvoie une valeur avec 4 décimales mais arrondie à deux chiffres aprés la virgule!
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]