Cases à cocher [Résolu]

[Titian]

Bonjour à tous,

J'ai inséré des cases à cocher sur une feuille excel via le développeur en insérant le contrôle de formulaire case à cocher.
Ce que je recherche maintenant est un code vba que je pourrais inclure dans une macro pour qu'à chaque clic sur un bouton cela efface les choix précédents saisis dans mes cases à cocher

Merci d'avance pour le coup de main

[filtep]

Bonjour

Pour chaque bouton

Code :

1
2
3
4
5
6
 
Sub checkbox_keypress()
for each checkbox in activesheet.controls
checkbox.value=false
next
end sub

Pas testé mais il te faut un truc dans ce genre (il faut s'assurer que le bouton clické se coche bien !)

A+
Philippe

[corona]

Bonjour,
Une piste parmi d'autres. Imaginons que tu veuilles remettre à False toutes les case à cocher de ta feuille au moment où on l'active.

Code :

1
2
3
4
5
6
Private Sub Worksheet_Activate()
 Dim cb As Object
 For Each cb In CheckBoxes
  cb = False
 Next
End Sub

[Titian]

Salut,

Merci pour les propositions, je vais partir sur cette base

Si un problème apparait, je posterai une nouvelle discussion