Controler un changement dans plusieurs textbox sans avoir à écrire un sub à chaq

Question

Bonjours tout le monde!
Je débute en VBA.
Mon problème :

J'ai un userform avec 289 textbox, et un textbox résultat.
je voudrai que mon textbox résultat se mette à jour dès qu'un changement et effectué dans les autres.
La technique un peu barbare que je connais serai de créer un module à chaque textbox du style :

Private sub Textbox1_change()

Calcul_Total

End sub

Ma question est n'existe t'il pas un moyen de créer un module du style:


Private sub Textbox(i)change()

Ou un autre moyen pour détecter qu'un changement s'est opéré dans un textbox et que le résultat doit être mis à jour.

Merci à tout ce qui seront me répondre.

bigfish_le vrai · Answer

Salut,

via une classe que tu charges à l'ouverture de ta form.

A+

jackoneill2000 · Answer

Merci de ta réponse

Mais cela ne m'aide pas beaucoup.
J'avoue avec honte que je ne sais pas encore créer de classe, ni y faire appel.

Pourrais tu juste me dire rapidement comment je dois faire:

-Pour déclarer mes textbox dans une classe.
- puis dans ma feuille faire appel à la classe.

d'avance merci de ta réponse.

bigfish_le vrai · Answer

Salut,

on va essayer d'y aller par étape:

pour commencer il faut ajouter à ton projet 2
 modules de classe.

-le premier que tu renommes en "ClassePourTextBox"

-le deuxieme que tu renommes en "TextBoxEvents"


Au premier module de classe tu ajoutes cette première partie de code :

Option Explicit

Dim AllTextbox() As TextBoxEvents, NbTextbox As Integer

Tu remarqueras que si au lieu de faire un copier/coller de ces 2 lignes tu écris : Dim AllTextbox() As
à partir de la "TextBoxEvents", notre second module de classe, apparaît maintenant dans la liste des objets disponibles.

Une fois cette etape effectuée, donne nous en retour, le nom de la form qui contient toute tes textbox.

A+

jackoneill2000 · Answer

Merci beaucoup pour toute cette aide en fait j'ai fini par trouver comment faire.
Je te posterai mon code final, comme ça tu pourras me  dire ce que tu en penses. 

Encore merci pour ta solidarité.

C'est en forgeant que l'on deviens forgeron ("mon grand-père").

Controler un changement dans plusieurs textbox sans avoir à écrire un sub à chaq

4 réponses

Votre réponse

Discussions similaires