XL 2010 Condition sur un arrondi VBA

[GENTILE]

Bonjour,

Je recherche l'aide de gens étant capable de m'éclairer sur ce sujet, Je sais comment appliquer un arrondi sur une valeur provenant d'un Excel, mais je établir des conditions à cet arrondi :
si valeur < 0,99 : 2 chiffres après la virgule
si valeur comprise entre 1,0 et 10,9 : 1 chiffre après la virgule
si valeur > 11 : 0 chiffre après la virgule

Je cherche à appliquer ce genre de modification sur cette ligne de codage:

Set monsignet = WordDoc.Bookmarks("X").Range
monsignet.Text = Round((Sheets("TransX").Range("Y2").Value), 1)

En bref il me faudra remplacer le "1" par la condition. demandée.
Dans un premier temps est-ce possible et comment pourrais-je faire?

Merci beaucoup pour votre aide par avance.

 

[eddy1975]

Bonsoir Gentile,

Je sais comment appliquer un arrondi sur une valeur provenant d'un Excel, mais je..... établir des conditions à cet arrondi :
si valeur < 0,99 : 2 chiffres après la virgule
si valeur comprise entre 1,0 et 10,9 : 1 chiffre après la virgule
si valeur > 11 : 0 chiffre après la virgule

Dans le doute et si cela peut t'aider. Je n'y connais rien en VBA mais les spécialistes te trouveront la solution

=SI(A1<=0,99;ARRONDI(A1;2);SI(ET(A1>1;A1<10,9);ARRONDI(A1;1);SI(A1>10,9;ARRONDI(A1;0))))

@+