Discussion :

[bosk1000]

Bonjour

J'ai une redondance de code pour une série de combobox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
'Private Sub produit1_Change()
 '   test Right(produit1.Name, 1)
'End Sub
'Private Sub produit2_Change()
 '   test Right(produit2.Name, 1)
'End Sub
'Private Sub produit3_Change()
 '   test Right(produit3.Name, 1)
'End Sub
'Private Sub produit4_Change()
 '   test Right(produit4.Name, 1)
'End Sub
'Private Sub produit5_Change()
 '   test Right(produit5.Name, 1)
'End Sub

y a t il une méthode pour l'optimisé ?

Je suis sur Excel 2016

Merci

[Philippe Tulliez]

Bonjour,
Pour intercepter un événement sur plusieurs objets, vous pouvez utiliser un module de classe

Voici le lien de plusieurs tutoriels sur le sujet

• Création et utilisation de classes personnalisées en VB 6.0 et VBA (partie 1)
• Office et les modules de classes
• Access : Modules de classes

[bosk1000]

Merci
Je vais étudier cela