Case a cocher

Bonjour,

Tu as également la possibilité d'associer la case à cocher à une macro.

1) Avec une case à cocher (contrôle de formulaire)
Macro associée dans un module standard :

Sub Test()
    If Feuil1.Shapes("Case à cocher 1").ControlFormat.Value = xlOn Then
        Range("F7") = "OUI"
    Else
        Range("F7") = "NON"
    End If
End Sub

2) Avec une case à cocher (contrôle ActiveX)
Procédure associée dans le module de la feuille :

Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        Range("F7") = "OUI"
    Else
        Range("F7") = "NON"
    End If
End Sub

Cordialement.

bonjour
a mon avis ce n'est pas possible (il vaut mieux comme tu le préconise masquer la cellule)

Bonjour,
Vous pourriez essayer ceci :