Bonjour,
Je cherche à créer un certain nombre de checkboxs en fonction de la taille (n) variable dépendant d'un critère.

Pour exemple :
Mon critère c'est "Homme" avec pour nombre de checkbox corréspondant aux nombres de ses caractéritiques (sexe, taille, age, poids). Nbre de checkbox = 4
Ensuite si je veux changer de critère je choisis "Région" avec pour nombre de checkboxs ses caratéristiques (nbre d'habitant, type de climat) . Nbre de checkbox = 2
Et donc le critère "Homme" et "Region" ne vont pas avoir le même nombre de checkboxs lorsque je vais ouvrir mon userform. 4<>2

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
Sub Add_Dynamic_Checkbox()
 
Dim DernLigne As Integer
Dim DerColonne As Integer
Dim a As Range
Dim i As Integer
Dim critere As Integer
Dim Cbx() As OLEObjects
 
' trouve l'adresse et renvoie le nbr max de colonne du critère désiré
DernLigne = Worksheets("Listes").Range("L4").End(xlDown).Row
Set a = Worksheets("Listes").Range("L4:L" & DernLigne).Find(Worksheets("Saisie").Range("E12"), lookat:=xlWhole)
critere= a.Row
DerColonne = Worksheets("Listes").Range("L" & critere).End(xlToRight).Column
' création des checkboxs
For i = 13 To DerColonne
        Set Cbx(i) = UserSegment.Controls.Add("Forms.CheckBox.1")
        Cbx(i).Caption = Worksheets("Listes").Cells(critere, i)
Next i
End Sub
Je n'arrive pas à créer un tableau de ce style : Cbx(i)

Avez vous une piste ou une solution à mon problème.
Pour infos je me suis renseigné au près de ce site : https://analysistabs.com/vba-code/ex...form/checkbox/
Merci