[E-03] faire une opération numérique dans une textbox ?

Bonjour,

J'ai dans un formulaire sur Excel2003 une textbox dans laquelle je rentre des valeurs numériques (type long).
J'aimerais savoir s'il existait une fonction sous vba qui me donnerait le résultat quand je rentre une opération au lieu d'un nombre.

J'ai essayé la fonction val mais ça me donne :

Code:

---

val("2.5+1.2") = 2.5

---

2.5+1.2 étant ce que j'ai rentré dans la textbox.

Quelqu'un aurait il une solution ?

Merci,

Jean-Marc

Bonjour,

Essai avec Evaluate(2.5 + 1.2)

Super ! ça marche ! Merci :)

Par contre, j'ai un truc bizarre, ça ne fonctionne pas avec la valeur "1" :aie:

Dans la fenêtre de débogage :

Code:

---

1 2 3 4 5 6 7 8

print evaluate("2") 2 print evaluate("-1") -1 print evaluate("1.1") 1,1 print evaluate("1") -> Erreur d'exécution '438': Propriété ou méthode non gérée par cet objet

---

J'y comprends rien ? Faut gérer une exception pour la valeur 1 ?

JM

J'ai testé dans la fenêtre de debogage d'un nouveau classeur :

print evaluate("1")
1

Ca marche ?!??? ! :aie:

Citation:

---

Envoyé par OtObOx

Ca marche

---

N'aurais-tu pas oublié le bouton :resolu:?

Oui, je pourrais le mettre, mais j'ouvre alors un autre post... Parce que le problème de '438': Propriété ou méthode non gérée par cet objet perdure...
J'ai même l'impression que ça change suivant les jours, puisque aujourd'hui, c'est le chiffre 3 qui faisait bugguer ma macro :aie:

En fait c'est la méthode print (que je ne connais pas bien) qui plante ici

Pour écrire dans le debogguer, j'ai fait ce test la :

Code:

---

1 2 3 4

Sub mtest() ' Print "toto" '=> erreur 438 Debug.Print "toto" ' => fonctionne End Sub

---

Non, ce n'est pas ça car je lance la commande print directement dans la fenêtre de debogage...
De plus, ça fonctionne pour toutes les valeurs, sauf pour le 1 8O Je ne comprends toujours pas pourquoi...

Effectivement, chez moi aussi la commande
print evaluate("1") directement dans la fenêtre d'execution du debogguer plante

Je n'utilise jamais cela, a quoi ca sert ???