Bonjour,

Je me suis inspiré des lignes de code d'Heureux-oli pour écrire cette fonction de création de checkbox :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub CréerCaseACocher()
'
'
    Selection.InlineShapes.AddOLEControl ClassType:="Forms.HTML:Checkbox.1"
    ActiveDocument.HTMLCheckbox1.Checked = True
 
    With ActiveDocument.HTMLCheckbox1
        .Checked = True
        .Height = 11
        .Width = 11
    End With
 
End Sub
Cela fonctionne très bien pour la création de la 1ère (Checkbox1), mais les suivantes s'affichent non cochées (valeur false).

Pouvez-vous m'indiquer comment récupérer le nom de la checkbox qui est créée dans une variable, afin de changer sa valeur avec .Checked=True.

Cordialement