Format TextBox VBA --> Excel

JB. -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
En programmant une textbox avec le code suivant: textbox.value = Format(textbox.value, "#,##0"), j'obtiens un format de saisie numérique avec séparation des milliers.
En exportant vers excel la valeur saisie dans cette textbox, le format n'est pas reconnu. Je ne peux donc pas m'appuyer sur cette donnée pour effectuer un calcul, ce qui me pose problème...
Est-ce que quelqu'un aurait une solution à me proposer?
Merci d'avance.
JB
Configuration: Windows XP
Firefox 3.5.2

2 réponses

  1.
    melanie1324 Messages postés 1561 Statut Membre 156
     
    Bonjour,

    la seule solution que j'ai trouvé est de mettre ta valeur textbox dans une variable, reformater ta variable et tu copies la variable dans une cellule :
    e = TextBox1.Value + 1 - 1
    e = Format(e, "#,##0")
    range("A1") = e

    J'ai essayé et ca marche!
    0
  2. Polux31 Messages postés 7219 Statut Membre 1 204
     
    Bonjour,

    Voilà le test que je viens de faire : 
    Private Sub CommandButton1_Click()
Dim mText As Variant

    If TextBox1.text = "" Then Exit Sub
    
    mText = Format(TextBox1.Value, "#,##0")
    
    Sheets(1).Range("A1").Value = mText
    
End Sub


    Si je tape 1234567 dans ma textbox, j'ai "1 234 567" dans ma cellule A1.

    Je n'ai sans doute pas bien compris ton problème.

    ;o)
    0