Problème format nombre textbox
svp j'ai un problème pour avec le format nombre de ma textbox13 du userform3 j'affiche la textbox13 sous format nombre avec le code suivant :
Private Sub TextBox13_AfterUpdate()
TextBox13.Value = Format(TextBox13.Value, "#,###.00")
End Sub
le problème quand je clique sur le boutton valider il renvoie le nombre de la textbox13 sur la cellule M2 de la feuille 3 mais avec un espace. par conséquent je suis obligé de supprimer manuellement cet espace pour avoir un nombre
ci-joint mon fichier
Bonjour
Quel est ton séparateur pour les décimales ? le point ou la virgule
Quoi qu'il en soit
Cells(2, 13) = Format(TextBox13.Value, "#,##.00")te donnera du texte
utilise plutôt
Cells(2, 13) = Replace(TextBox13.Value, " ", "") * 1à adapter, le but est de supprimer les caractères inutiles et de transformer en nombre
Autre proposition : remplace tes userform par un onglet dédié à l saisie, c'est plus simple à mettre en oeuvre (contrôle de saisie, formats ...)
Bonjour, sa3d88 et Steelson
personnellement j'utilise le format :
Pour le after update :
TextBox13.Value = Format(TextBox13.Value, "#,##0.00 [-40C]")
Et pour l'évèvement bouton valider :
Cells(2, 13) = Format(TextBox13.Value, "#,##0.00 [-40C]")