Case à décocher

[RONIBO]

Bonjour, je fais appel à vous car j'aimerai intégrer un checkbox, qui va me permettre de décocher tous les checkbox d'une colonne.

Une capture est mise en pj, pour plus d'information

Merci d'avance et à bientot

 

[xhudi69]

Re : Case à décocher

Bonsoir ronibo, le Forum

en PJ si cela te conviens.

@+

 

[RONIBO]

Re : Case à décocher

Bonsoir ronibo, le Forum

en PJ si cela te conviens.

@+

Bonsoir,
tout dabord merci.

c'est a peut près se que je voulais, mais je voulais savoir si c'est possible de'avoir qu'un checkbox

puis sur ton projet des que j'essaye de cocher tout, sa marche pas, juste la première ligne qui se coche.

cdlt

 

[Staple1600]

Re : Case à décocher

Bonjour à tous

RONIBO
juste pour te signaler qu'il vaut mieux joindre des pj anonymisées 😉

EDITION: et pour ce qui est des checkboxs
Essaies ce qui suit

Private Sub Pointage_Click()
Dim oCBX As Object
For Each oCBX In ActiveSheet.OLEObjects
    If TypeName(oCBX.Object) = "CheckBox" Then
        oCBX.Object.Value = IIf(Pointage, True, False)
    End If
Next oCBX
End Sub

NB: Les CheckBoxs ici sont issues de la barre d'outils Contrôles (pas Formulaire)
et j'ai renommé la CheckBox en J2 en Pointage
(PS: j'ai testé, cela fonctionne sur mon PC)
Checkbox Pointage cochée: Toutes les Checkbox sont cochées
Checkox Pointage décochée: Toutes les Checkbox sont décochées.

 

[RONIBO]

Re : Case à décocher

Bonjour à tous

RONIBO
juste pour te signaler qu'il vaut mieux joindre des pj anonymisées 😉

EDITION: et pour ce qui est des checkboxs
Essaies ce qui suit

Private Sub Pointage_Click()
Dim oCBX As Object
For Each oCBX In ActiveSheet.OLEObjects
    If TypeName(oCBX.Object) = "CheckBox" Then
        oCBX.Object.Value = IIf(Pointage, True, False)
    End If
Next oCBX
End Sub

NB: Les CheckBoxs ici sont issues de la barre d'outils Contrôles (pas Formulaire)
et j'ai renommé la CheckBox en J2 en Pointage
(PS: j'ai testé, cela fonctionne sur mon PC)
Checkbox Pointage cochée: Toutes les Checkbox sont cochées
Checkox Pointage décochée: Toutes les Checkbox sont décochées.

Merci beaucoup, c'est exactement se que je voulais!