Utilisation d'une variable pour appel à des procédures
Bonjour à tous,
Voilà ma problématique.
Je dispose au sein d'un userform de plusieurs Private sub qui, dans leur nom, ne varient que par le préfixe (ex : AB_coupable_Change / CD_coupable_Change / EF_coupable_Change)
Je voudrai appeler ces Private sub lors de l'initialisation de l'UserForm.
L'une des solutions serait simplement de C/C le nom des 30 procédures, mais dans la mesure où je dispose déjà à l'initiation d'une boucle faisant intervenir AB, CD et EF au sein d'une variable, je me dis que je pourrai en profiter pour y glisser le nom des procédure.
Dans les faits, voilà ce que j'ai :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| Private Sub UserForm_Initialize
Dim art(2) As String, i As Integer
art(0) = "AB"
art(1) = "CD"
art(2) = "EF"
For i = 0 To 2
...
...
Liste de plusieurs actions avec art(i) en variable pour désigner des controles du type : Controls("Controle1_" & art(i))
...
Next i
End Sub |
Je voudrai donc glisser dans le For, des lignes dans le style :
Code:
1
2
3
4
5
| art(i)_procedure1_change
art(i)_procedure2_change
art(i)_procedure3_change
art(i)_procedure4_change
art(i)_procedure5_change |
Problème : je ne trouve pas la syntaxe exacte à utiliser pour désigner les différents Private Sub à appeler, en intégrant la variable art(i).
Merci d'avance pour votre aide, en espérant avoir été compréhensible dans ma demande.
