TextBox calculatrice "Résolu"

gam

XLDnaute Junior
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.
 
Dernière édition:

Fred0o

XLDnaute Barbatruc
Re : TextBox calculatrice

Bonsoir gam,

Voici une autre solution qui effectue le calcul lorsqu'on clique sur un bouton "CommandButton1" :
VB:
Private Sub CommandButton1_Click()
    TextBox1.Value = Evaluate(TextBox1.Text)
End Sub

A+
 

gam

XLDnaute Junior
Re : TextBox calculatrice

Super merci FredOo.:D
J'ai mis ton code dans la Sub TextBox1_Exit et ça marche formidablement bien.
VB:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Evaluate(TextBox1.Text)
End Sub

Rapide et efficace, milles merci FredOo ;)
 

Discussions similaires

Statistiques des forums

Discussions
312 883
Messages
2 093 240
Membres
105 657
dernier inscrit
dominique pinocchio