Vba: Excel >Word , Probleme de decimales

Résolu
flostralian Messages postés 32 Statut Membre -  
flostralian Messages postés 32 Statut Membre -
Bonjour,

Je me tourne vers vous car après de longues recherches sur les forums, je n'ai toujours pas réussi a résoudre mon problème.
J'ai un classeur avec de nombreuses données qui sont exportées via des signets dans un modele Word.
Le code marche très bien et le transfert se fait sans problème.
Cependant, les nombres qui sont a 2 décimales dans Excell apparaissent sous Word avec une dizaine de décimale.
Je n'ai besoin que de 2 décimales dans mon document word.
Extrait du code vba qui permet d'exporter une donnée via des signets:

WordDoc.Bookmarks("dif1").Range.Text = Worksheets("baseline").Cells(..,..)


Que dois je integrer dans mon code Vba afin d'avoir seulement 2 decimales dans Word?
Merci de votre aide
Florian


3 réponses

Patrice33740 Messages postés 8930 Statut Membre 1 780
 
Bonjour,

Essaie :
WordDoc.Bookmarks("dif1").Range.Text = _
Format(Worksheets("baseline").Cells(..,..), "0.00")
0
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
= Round(Worksheets("baseline").Cells(..,..) ,2)

J'ai pas tester, si ça va pas tu dis.
A+
0
flostralian Messages postés 32 Statut Membre
 
Merci a vous deux pour cette reactivite, et de ces informations pertinentes.
Ca marche !
Merci
Florian
0