Discussion :

[nezegol]

Bonjour,

J'ai un petit problème pour manipuler une checkbox d'un userform à partir d'un string d'un tableau.
Précisément, j'ai les noms de mes checkboxs dans un tableau et je souhaiterai appeler ces différentes checkboxs à partir des valeurs du tableau.
Un truc du type "Userform.t(i).value".

Merci de vos retours.

[Gado2600]

Bonjour,

Ce n'est pas aussi facile que ce que tu mis en code pour ce que tu veux faire...

Il te faut :

• Une variable de type control, checkbox ou object
• Une boucle sur tous tes contrôles d'Userform
• Une condition pour savoir si c'est le contrôle que tu recherches (par rapport au nom)

Cordialement,

[Theze]

Bonjour,

Simple, un exemple :

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
17
18
19
20
 
Dim Tbl(1 To 5) As String
 
Private Sub UserForm_Activate()
 
    Tbl(1) = "CheckBox1"
    Tbl(2) = "CheckBox2"
    Tbl(3) = "OptionButton1"
    Tbl(4) = "ToggleButton1"
    Tbl(5) = "ToggleButton2"
 
End Sub
 
Private Sub CommandButton1_Click()
 
    Dim I As Integer
 
    For I = 1 To UBound(Tbl): UserForm1.Controls(Tbl(I)).Value = True: Next I
 
End Sub

[nezegol]

Merci beaucoup à tous les deux.
Effectivement cela marche, il me manquait l'instruction Controls().

Bonne soirée!!