Format TextBox VBA --> Excel

JB. -  
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

2 réponses

Réponse 1 / 2
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   155
 
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
Réponse 2 / 2
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   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