Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment résumer des valeurs à partir de zones de texte?

Supposons que vous ayez trois zones de texte dont vous voulez additionner les valeurs dans TextBox1 et TextBox2, et calculez le résultat automatiquement dans TextBox3 comme suit capture d'écran. Comment pourriez-vous gérer ce travail dans Excel?

doc textbox sum valeurs 1

Résumer les valeurs des zones de texte avec le code VBA


flèche bleue droite bulle Résumer les valeurs des zones de texte avec le code VBA


Pour résumer les valeurs de deux zones de texte et obtenir le résultat dans la troisième zone de texte, le code VBA suivant peut vous aider.

1. D'abord, vous devez insérer trois zones de texte, cliquez sur Développeur > insérer > Zone de texte (contrôle ActiveX), puis dessinez une zone de texte et faites deux copies, voir capture d'écran:

doc textbox sum valeurs 2

2. Après avoir inséré les zones de texte, cliquez avec le bouton droit sur l'onglet de la feuille qui contient les zones de texte que vous souhaitez utiliser, puis cliquez sur Voir le code à partir du menu contextuel pour ouvrir le Microsoft Visual Basic pour applications fenêtre, puis copiez et collez le code VBA suivant dans le module vide:

Code VBA: résumez les valeurs des zones de texte:

Private Sub Sum_Click()
    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)
End Sub

doc textbox sum valeurs 3

3. Tapez ensuite les valeurs dans Textbox1 et Textbox2, puis appuyez sur F5 clé ou course bouton pour exécuter le code, le résultat calculé est immédiatement affiché dans Textbox3, voir capture d'écran:

doc textbox sum valeurs 4



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.