Décocher les cases d'une colonne

Bonjour !

Etant vraiment un novice d'Excel je me balade depuis plusieurs semaine et en espérant apprendre un jours le VBA. mais cependant aujourd'hui j'ai besoin de vos connaissances. J'aimerai décocher toute les cases d'une seule colonne lorsque je clique sur un bouton. J'ai deja créé mon bouton avec un bout de code mais j'arrive pas lui rajouter le filtre "columns.". Pouvez vous m'éclairer ?

Voici le code en question qui fonctionne mais il me décoche toute les cases.

Sub ClearCheckBoxes()
'Updateby Extendoffice
Dim chkBox As Excel.CheckBox
Application.ScreenUpdating = False
For Each chkBox In ActiveSheet.CheckBoxes
chkBox.Value = xlOff
Next chkBox
Application.ScreenUpdating = True
End Sub

Bonjour,

Pouvez-vous essayer ce code :

Sub ClearCheckBoxes()
'Updateby Extendoffice
Dim chkBox As Excel.CheckBox
Application.ScreenUpdating = False
For Each chkBox In ActiveSheet.CheckBoxes
    if ChkBox.topleftcell.column = 1 then chkBox.Value = false
Next chkBox
Application.ScreenUpdating = True
End Sub

Cdlt,

3GB un grand merci ! Rapide, efficace quoi demander de plus ! je vous souhaites une bonne continuation, bravo pour votre travaille. Etant étudiant en management je comprends rien de tout ça mais ce que je sais c'est que c'est très utile. Merci

Merci pour ce retour chaleureux remso, ça me fait plaisir !

J'espère que ça vous sera utile et Excel est sans aucun doute un outil utile !

Bonne continuation !