[VBA-E]Probleme de format

Bonjour,

J'affiche dans un userform, un ensemble de résultat dont un %.
Le seul souci c'est que la taille de ma cellune ne se limite pas à 1 decimale apres la virgule comme on le voit dans la feuille Excel mais on une multitude de chiffres apres la virgule et de surcroit pas tous au format %.

Comment limiter le format de mon controle label1 a une decimale et a le definir comme un % ?

merci d'avance

La propriété "caption" d'un label est un string.
Donc c'est à toi de faire le calcul (division par 100), puis d'arrondir à une décimale (Round() ), puis de convertir le résultat en string et d'y ajouter le symbole "%".

sinon utilise la fameuse fonction bien nommée Format:

Code:

---

Label1 = Format(123 / 456, "#.## %")

---

remplace 123 / 456 par ton opération :arrow:

MErci

Mais si je veux arrondir a une valeur apres la virgule, je dois ecrire :

Code:

---

Round (Sheets("base-pareto").Range("BE" & i + 2).Value, 1)

---

Et pourtant ca ne marche pas

Tu peux m'aider ?

C'est bon ca marche, j ai fait :

Code:

---

1 2	arrondi = Round(Sheets("base-pareto").Range("BE" & i + 2).Value * 100, 1) userform1.Controls("BP" & i).Caption = arrondi & " %"

---

merci bcp

Je ne veux pas insister, mais ça ressemble drôlement à ce que je t'ai proposé au début. Sauf que si tu voulais être propre, tu écrirais

Code:

---

1 2	arrondi = Round(Sheets("base-pareto").Range("BE" & i + 2).Value * 100, 1) userform1.Controls("BP" & i).Caption = Cstr(arrondi) & " %"

---