Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Calculatrice Vba

halecs93

XLDnaute Impliqué
Bonjour,

J'ai tenté de mettre en place une calculatrice en Vba (bouton calculatrice 3). Le but est d'afficher le résultat des opérations dans la cellule active de la feuille excel.

Je parviens à effectuer ceci en saisissant les chiffres et opérations à la souris. Mais j'aimerais que l'utilisateur puisse le faire également avec le pavé numérique de son clavier.

Quelqu'un aurait-il une solution à m'apporter ?

Un grand merci.
 

Pièces jointes

  • Calculatrice.xlsm
    35.7 KB · Affichages: 7
Trier par date Trier par votes
S

scraper

XLDnaute Nouveau
Bonjour
J'ai gardé le userform sans le code
Le textbox permet d'entrer un calcul à faire; j'ai pensé sur l'entrée de la touche égale lancer l'exécution de l'evaluation

VB: 
Private Sub TextBox1_Change()
If Mid(TextBox1.Text, Len(TextBox1.Text)) = "=" Then
  TextBox1.Text = Application.Evaluate(Mid(TextBox1.Text, 1, Len(TextBox1.Text) - 1))
' pour enregistrer le résultat dans la cellule active
ActiveCell.Text= Textbox1.Text
End If
End Sub
 
Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué
Merci, mais je ne sais pas bien la réponse... du coup, votre solution n'utilise plus le userform comme il est initialement, mais simplement d'entrer les calculs dans un textbox pour ensuite le valider dans la cellule active ? Ca c'est une solution que j'utilisais (calculatrice 2) dans mon fichier.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

W
  • Résolu(e)
XL 2016 Problème de comptage pour trouver les trois meilleurs
2
Réponses
19
Affichages
638
Webperegrino
W
W
  • Résolu(e)
XL 2016 Ordonner une cellule ou un pavé de cellules contenant des chr(10)
Réponses
5
Affichages
403
Webperegrino
W
T
  • Question
XL 2016 VBA listing de contacts
Réponses
1
Affichages
249
Dranreb
  • Question
XL 2019 J’ai tenté de filtrer les anomalies dans le tableau en utilisant un code VBA. Malheureusement, le code initial ne semble pas fonctionner correctement.
Réponses
2
Affichages
171
Saalut
  • Question
Microsoft 365 Créer une Document Word à partir de champs et listes
2
Réponses
15
Affichages
1 K
Compte Supprimé 979
C
R
  • Question
XL 2021 Affichage d'une suite de chiffres
Réponses
5
Affichages
448
patricktoulon
C
  • Question
Microsoft 365 Synthèse de données
2
Réponses
23
Affichages
765
Corinne
C
  • Question
Autres Mise à jour fichier créé il y a 14 ans avec votre aide !
2
Réponses
20
Affichages
868
dn35
  • Question
XL 2021 Besoin de conseils pour une sélection de multiples éléments
2
Réponses
18
Affichages
887
jeff1494
  • Résolu(e)
Microsoft 365 VBA : formule Excel en variable
2
Réponses
24
Affichages
1 K
mapomme
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…