Affichage valeur de cellule dans USERFORM

Bonjour,

Je souhaite afficher une valeur monétaire dans un userform.

Pour cela j'ai crée une textbox sur laquelle j'ai rentré le code :

TextBox1 = Sheets("Données").Range("O28")

Le probleme est que le format de la cellule n'est pas respecté (Espace des milliers, millions et symbole des euros).

Est ce qu'il y a un moyen de les afficher?

Je vous remercie par avance.

Cordialement.

Bonjour

A tester

TextBox1.Value = Format(Sheets("Données").Range("O28"), "0.00 €")

Bonjour

a voir aussi

TextBox1 = Sheets("Données").Range("O28").Text

A+

Maurice

Bonjour et merci.

Ca fonctionne et pour ceux qui auront le même probleme j'ai ajusté le code pour avoir les espaces des milliers et millions en :

TextBox1.Value = Format(Sheets("Données").Range("O28"), "0 000 000.00 €")

Encore merci.

Bonjour Olivier,

tu as utilisé le format "0 000 000.00 €" ; je te propose de mettre plutôt : "# ### ##0.00 €"

ceci car le signe « # » est pour un chiffre éventuel.

TextBox1.Value = Format(Sheets("Données").Range("O28"), "# ### ##0.00 €")

dhany