Conversion texte en chiffre dans userform
Résolu
Bonjour,
Quelqu'un pourrait-il me la formule pour que ma formule ci-dessous dans mon userform1 qui marche bien sauf que les chiffres deviennent des textes
[K21] = TextBox11
Que faudrait-il ajouter à cette formule pour convertir les textes en chiffres.
Grand merci, je galère depuis des heures et malgré les forums, je n'arrive pas à solutionner mon problème.
Quelqu'un pourrait-il me la formule pour que ma formule ci-dessous dans mon userform1 qui marche bien sauf que les chiffres deviennent des textes
[K21] = TextBox11
Que faudrait-il ajouter à cette formule pour convertir les textes en chiffres.
Grand merci, je galère depuis des heures et malgré les forums, je n'arrive pas à solutionner mon problème.
7 réponses
-
-
Bonjour
[K21] = TextBox11
pour des chifres sans decimal
[K21] = Val(TextBox11.Value)
A+
Maurice -
Merci Maurice c'est super. Puis-je abuser pour te demander la formule pour des décimal et monétaires
Mais je suis déjà très satisfait de ce que tu m'as indiqué
Cdlt -
ContributeurBonjour,
tu as tout dans le lien fourni par f894009.
Choisi le type Double.
eric
-
Re
'a la saisie sans decimal
Private Sub TextBox11_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 48 To 57
KeyAscii = KeyAscii
Case Else
KeyAscii = 0
End Select
End Sub
'avec decimal
Private Sub TextBox11_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 46, 48 To 57
KeyAscii = KeyAscii
Case 44
KeyAscii = 46
Case Else
KeyAscii = 0
End Select
End Sub
regarde bien comment ca marche
A+
Maurice -
Je n'aurai qu'un mot MERCI Maurice
Ca marche supr
Cdlt -
ContributeurOn peut aussi faire :
[K21] = cdbl(TextBox11)
La flemme de lire un lien, c'est terrible...
eric
