bonjour à tous,
voilà j'ai créé des checkbox en dynamique, mais je n'arrive pas à récupérer l'évènement "click" individuellement pour chaque checkbox.
Voici mon code
Dans un module de classe : "classe1"
Dans le code de mon userform
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Public WithEvents ess As CheckBox Private Sub ess_click() 'ici je recupère bien tous mes évènement click End Sub
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 Option Explicit Dim cgroup() As New Classe1 Public i As Integer Private Sub CommandButton1_Click() i = i + 1 ReDim Preserve cgroup(1 To i) As New Classe1 Set cgroup(i).ess = Controls.Add("Forms.checkbox.1", "toto", True) With cgroup(i).ess .Move i * 10, i * 20 .Visible = True End With End Sub
Si quelqu'un peux m'aider, merci
Partager