Conversion texte en chiffre dans userform Résolu/Fermé

Question

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.

Configuration: Windows 7 / Chrome 38.0.2125.104

f894009 · Answer

Bonjour,

http://www.gaboly.com/VBA/ConversionType.html

Maurice · Answer

Bonjour

[K21] = TextBox11

pour des chifres sans decimal

[K21] = Val(TextBox11.Value)

A+

Maurice

mchotard · Answer

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

eriiic · Answer

Bonjour,

tu as tout dans le lien fourni par f894009.
Choisi le type Double.

eric

Maurice · Answer

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

mchotard · Answer

Je n'aurai qu'un mot MERCI Maurice
Ca marche supr
Cdlt

eriiic · Answer

On peut aussi faire :
[K21] = cdbl(TextBox11)
La flemme de lire un lien, c'est terrible...
eric

Conversion texte en chiffre dans userform

7 réponses

Discussions similaires