Bonjour à tous,

J'ai sur la ligne 1, un certain nombre de cellule qui se suivent. Je voudrais en scrutant cette ligne, que pour chaque valeur de cellule une checkbox soit insérée (avec comme nom la valeur de la cellule) dans mon userform.

Je sais créer un userform par macro:

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
Sub CreerUserform()
 
'Création d'un UserForm
 
Dim UserForm As Object
 
Set UserForm = ThisWorkbook.VBProject.VBComponents.Add(3)
 
With UserForm
.Properties("Caption") = "Le caption de mon Userform"
.Properties("Width") = 300
.Properties("Height") = 200
End With
 
End Sub
En vous remerciant par avance.