utiliser une CheckBox créée dynamiquement
Bonjour,
J'ai un problème, surement très simple mais je ne m'en sors pas !
Je voudrais créer des checkbox dynamiquement dans ma feuille excel (je ne connais pas à l'avance le nombre de checkbox que je dois créer), puis utiliser le résultat de ces checkbox.
Pour cela, j'arrive a créer une checkbox grâce au code suivant:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| Public Sub test()
Range("C3").Select
ActiveSheet.CheckBoxes.Add(ActiveCell.Left, ActiveCell.Top + 6.75, ActiveCell.Width, ActiveCell.Height).Select
With Selection
.Value = xlOn
.Characters.Text = ""
.Width = 11.25
.Height = 6.75
End With
end sub |
Cependant, je n'arrive pas a récupérer la référence de celle ci, pour pouvoir l'utiliser plus loin dans mon programme.
En gros, je voudrais faire:
Code:
set referenceCheckBox1 = ActiveSheet.CheckBoxes.Add(ActiveCell.Left, ActiveCell.Top + 6.75, ActiveCell.Width, ActiveCell.Height).Select
pour ensuite pouvoir faire reference CheckBox1.Value = TRUE (par exemple).
Si quelqu'un a la solution, je lui serais vraiment reconnaissant !
Merci & Bye
Maxence
