Bonjour,

je souhaite utiliser la fonction SET pour référencer 5 CheckBox à travers une boucle FOR.
Est-il possible d'utiliser une boucle pour identifier des objets d'un UserForm ?



Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Function AssignerValeur(bValeur as Boolean)
'------------------------------------------
Dim mCheckBox As CheckBox
Dim Index As Integer
 
    For Index = 1 To 5
        'CheckBox1, CheckBox2,CheckBox3,CheckBox4,CheckBox5
        Set mCheckBox = ????
        mCheckBox.Value = bValeur
        mCheckBox = Nothing
    Next Index
End Function