Mise en forme d'un nombre dans une Textbox

Bonjour à tous !
Je rentre des données via une userform qui se retrouvent ensuite dans un tableau Excel (avec des calculs).
Pour que ce soit plus lisible au moment de la saisie des gros nombres, je souhaiterai mettre les nombres rentrés dans mes textbox de la userform sous le format "xxx xxx xxx"
Ce code fonctionne :

Code:

---

1 2 3 4

Sub TextBox1.Change() TextBox1.Text = Format(TextBox114.Value, "### ### ###") End Sub

---

MAIS Excel me converti automatiquement la donnée sous format texte (alors que sous le format basique "xxxxxxxxx", Excel reconnaît bien un nombre). Ce qui est un problème puisque Excel ne peut donc plus me calculer les formules de mon tableau...
Ci dessous photo de mon problème sous Excel :
Pièce jointe 460977

J'imagine que c'est tout bête, mais je n'ai rien trouvé qui marchait sur internet,

Merci de votre aide ! :D

Si tu n'as pas de décimales, essaies ceci

Code:

---

1 2 3

Cells(1, 4) = TextBox1.Text Cells(2, 4) = Val(TextBox1.Text) Cells(3, 4) = 1 * TextBox1.Text

---

Bonjour Mercatog,
merci, cela fonctionne, pas besoin de mettre la dernière ligne même
Pour ceux que ça intéresse, voici le code pour mettre en forme la textBox1 qui est renvoyée sous format nombre dans la cellule B1 de la Feuil1 :

Code:

---

1 2 3 4 5

Private Sub TextBox1_change() TextBox1.Text = Format(TextBox1.Value, "### ### ###") Sheets("Feuil1").Cells(1, 2) = Val(TextBox1.Text)   End Sub

---

J'ai mis les 3 pour la démonstration.