Dans un UserForm, j'ai un TextBox pour afficher le prix.
J'ai une variable prix = "123456"
Je voudrais afficher 123 456 ? sans modifier la valeur de ma variable prix.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Denis Michon
Bonjour CS78,
'--------------- Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.TextBox1 = Format(Me.TextBox1, "#,##0")
'OU selon le type de données du textbox
Me.TextBox1 = Format(Me.TextBox1, "#,##0.00")
End Sub '---------------
Salutations!
"CS78" a écrit dans le message de news:bo2o47$jk1$ Bonjour
Dans un UserForm, j'ai un TextBox pour afficher le prix. J'ai une variable prix = "123456" Je voudrais afficher 123 456 ? sans modifier la valeur de ma variable prix.
Est-ce possible ?
Merci
Bonjour CS78,
'---------------
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.TextBox1 = Format(Me.TextBox1, "#,##0")
'OU selon le type de données du textbox
Me.TextBox1 = Format(Me.TextBox1, "#,##0.00")
End Sub
'---------------
Salutations!
"CS78" <christophe.simardnospam@wanadoo.fr> a écrit dans le message de news:bo2o47$jk1$1@news-reader5.wanadoo.fr...
Bonjour
Dans un UserForm, j'ai un TextBox pour afficher le prix.
J'ai une variable prix = "123456"
Je voudrais afficher 123 456 ? sans modifier la valeur de ma variable prix.
'--------------- Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.TextBox1 = Format(Me.TextBox1, "#,##0")
'OU selon le type de données du textbox
Me.TextBox1 = Format(Me.TextBox1, "#,##0.00")
End Sub '---------------
Salutations!
"CS78" a écrit dans le message de news:bo2o47$jk1$ Bonjour
Dans un UserForm, j'ai un TextBox pour afficher le prix. J'ai une variable prix = "123456" Je voudrais afficher 123 456 ? sans modifier la valeur de ma variable prix.