Textbox en notation scientifique

Bonjour à tous,

J'aimerais savoir comment on peut saisir en notation scientifique du type "x,xyzE-5" dans un textbox. Le code que j'ai me permets de ne saisir que des nombres decimaux simples.

Code:

---

1 2 3 4 5 6 7

Private Sub TextBox1_Change() On Error Resume Next If Not IsNumeric(Right(TextBox1, 1)) And Right(TextBox1, 1) <> "," Then MsgBox "Le caractère saisi n'est pas valide" TextBox1 = Left(TextBox1, Len(TextBox1) - 1) End If End Sub

---

Merci pour le coup de pouce.

Bonjour

VBA reconnaît le format scientifique. Tu peux donc saisir 1.234E-5 dans un textbox et utiliser la fonction Val(Expression) pour convertir ta saisie en valeur numérique.

Code:

---

If IsNumeric(TextBox1) Then MsgBox Val(TextBox1)

---

Si tu utilises ce code en saisissant 1.234E-5 dans un textbox, le message t'affichera 0.00001234

Merci,
Problème résolu