définir 1 seule fois un évènement pr tous textbox

[daniel]

Bonjour le forum,

Dans un userform, j'ai de nombreux contrôles textbox et j'aimerais que tous réagissent de la même manière un évènement (on click, change).

Je voudrais éviter d'avoir à indiquer pour chaque textbox la procédure à déclencher sur évènement.

Y a-t-il un moyen de définir 'par défaut' une procédure à affecter à un évènement pour tous les textbox d'un userform ?

merci d'avance pour aide,

daniel

 

[MichelXld]

bonsoir Daniel

tu pourrais utiliser les modules de classe pour faire cela

ci joint un exemple par Didier, MyDearFriend

Lien supprimé

Lien supprimé



bonne soirée
MichelXld

 

[Dull]

Re:définir 1 seule fois un évènement pr tous textb

Salut Daniel, le Forum,


Peut tu être plus précis (Un petit fichier par example)
sinon met tes proc par 'défaut' dans UserForm_Initialize()

 

[Dull]

Re:définir 1 seule fois un évènement pr tous textb

re Salut le fil

Et BOUM!!! Pas trop de mal michel!!! 🙁

 

[lio]

Re:définir 1 seule fois un évènement pr tous textb

Bonjour le fil,

Peut être un début de solution:
Dim Ctrl As Control

For Each Ctrl In Controls
If Ctrl.Name différent 'Textbox' Then
Ta_Macro
End If
Next
utilser en réalité inférieur et sup
Une 2ème piste: Agir sur la propriété Tag

Bonne fin de WE 🙁

Message édité par: lio, à: 23/04/2006 18:47

 

[daniel]

Bonsoir le forum,

Merci à tous pour vos réponses si rapides ! Je me doutais que l'allais devoir recourir aux modules de classe, mais je ne es maîtrise pas vraiment...Heuresuement que ta démo, Michel, est explicite ! Je n'ai plus qu'à l'adapter à mes besoins 😉

Encore merci et bonne soirée

Daniel