TextBox calculatrice "Résolu"

[gam]

Bonsoir

Je cherche à faire plusieurs calculs simples que l'utilisateur aurait inscrit dans une TextBox, tel que celui-ci: 5+8-9*10 et que le résultat puisse s'afficher dans cette même TextBox.

En cherchant sur le forum, j'ai trouvé ce topic: https://www.excel-downloads.com/threads/resultat-dun-calcul-de-textbox-dans-le-meme-textbox.153289/ . La solution de FredOo marche très bien mais seulement pour un type de calcul (l’addition/soustraction etc...). Mais j'aimerais pouvoir additionner, soustraire ou même multiplier dans la même Texbox.
Avez vous un début de solution à me soumettre ?

Je vous remercie par avance.

 

[Fred0o]

Re : TextBox calculatrice

Bonsoir gam,

Voici une autre solution qui effectue le calcul lorsqu'on clique sur un bouton "CommandButton1" :

Private Sub CommandButton1_Click()
    TextBox1.Value = Evaluate(TextBox1.Text)
End Sub

A+

 

[gam]

Re : TextBox calculatrice

Super merci FredOo.
J'ai mis ton code dans la Sub TextBox1_Exit et ça marche formidablement bien.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Evaluate(TextBox1.Text)
End Sub

Rapide et efficace, milles merci FredOo