Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

(RESOLU par PIERROT) format personalisée

chaelie2015

XLDnaute Accro
Bonjour Forum
Code:
Private Sub TextBox6_Change()
TextBox6.Value = Format(TextBox6.Value, "# ##0,00")
End Sub

je souhaite afficher un chiffre de format normalisée exemple
203125.23 => 203 125,23 dans un TextBox
mais le code que j'ai ci dessus
il n'affiche pas bien si je saisie un nombre de 09 chiffre
123456789 =>123 4 56 789 ????? alors qu'il doit affiché 123 456 789
merci
 
Dernière édition:

Pierrot93

XLDnaute Barbatruc
Re : format personalisée

Re,

modifie comme suit, mais préférable de placer ce code sur l'événement exit de l'objet :
Code:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Format(Val(Replace(TextBox1.Value, ",", ".")), "#,##0.00")
End Sub
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…