Formatage textbox userform

Bonjour le forum,

J'aimerais formater l'affichage du textbox de mon userform en % comme (00,00%)

Voici le morceau de programme

Dim Ligne1 As Long

For Ligne1 = 4 To 15

Me.Controls("TB_Pcent_Imp_" & Ligne1 - 3) = Worksheets("Tableaurecap").Range("BM" & Ligne1)

Next Ligne1

Dans la premiere cellule de la boucle (BM,4)sur la colonne source BM, la valeur est bien 23,12 % (parce que j'ai formée le résultat en %)

Que faudrait-il ajouter à Me.Controls("TB_Pcent_Imp_" & Ligne1 - 3) pour avoir le formatage en %

Actuellement l'affichage de (TB_Pcent_Imp_" & Ligne1 - 3)dans le userform est 0,231178...

Un grand merci pour votre aide

Guy

Bonjour,

Si le format de cellule est en %, utiliser la propriété .Text de la plage au lieu de .Value.

Bonjour MFerrand,

Suis d'accord avec Toi si j'ai une valeur unique comme

TB_Pourcent_WWW = x.Offset(0, 3).Value

alors je remplace .Value par .text

Moi je vais chercher la valeur source avec range dans l'onglet Tableaurecap

Me.Controls("TB_Pcent_Imp_" & Ligne1 - 3) = Worksheets("Tableaurecap").Range("BM" & Ligne1)

Comment appliquer le même raisonnement ?

Si t'as une idée, merci pour ta réponse

Guy

????

Worksheets("Tableaurecap").Range("BM" & Ligne1).Text

Merci MFerrand,

C'est parfait. ça marche .

Le textbox du Userform prend "le format" de la cellule source.

Résolu !!!!

Ce n'est pas ça, le TextBox ne prend aucun format, son contenu est toujours du texte.

Quand tu lui affectes le contenu renvoyé par la propriété Value d'une cellule, c'est la valeur contenue dans la cellule qui est renvoyée, si tu affectes le contenu renvoyé par la propriété Text, c'est la valeur telle qu'elle apparaît en fonction du format de cellule qui est renvoyée.

MFerrand,

Merci, ton explication est claire !

Je comprends mieux la différence entre .value et .text

A+

Rechercher des sujets similaires à "formatage textbox userform"