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.

7 réponses

  1. Contributeur
    On peut aussi faire :
    [K21] = cdbl(TextBox11)
    La flemme de lire un lien, c'est terrible...
    eric
    1
    1. Je n'aurai qu'un mot MERCI Maurice
      Ca marche supr
      Cdlt
      0
      1. 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
        0
        1. Contributeur
          Bonjour,

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

          eric
          0
          1. 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
            0
            1. Bonjour

              [K21] = TextBox11

              pour des chifres sans decimal

              [K21] = Val(TextBox11.Value)

              A+

              Maurice
              0