Grouper plusieurs codes dans une macro ? Est-ce possible ?

Private Sub CheckBox1_Click()
If Me.CheckBox1 Then [F4].Interior.ColorIndex = 15 Else [F4].Interior.ColorIndex = xlNone
End Sub

Bonjour,

Deuxième question

Est-il possible de faire à partir de ce code : pouvoir inclure plusieurs checkbox et griser plusieurs cellules.
C'est pour éviter à avoir à recopier le code plusieurs fois.
Merci beaucoup pour votre aide.

Séb

salut, oui tout est possible en informatique....quand on sait

te propose cette solution à tester,car j'en suis pas sûr
tu recopies ta macro pour d'autres cellules: comme

Private Sub CheckBox2_Click()
If Me.CheckBox1 Then [F1].Interior.ColorIndex = 15 Else [F1].Interior.ColorIndex = xlNone
End Sub

ainsi de suite

et tu ajoutes le nom des macros dans la 1ère macro

Private Sub CheckBox1_Click()
If Me.CheckBox1 Then [F4].Interior.ColorIndex = 15 Else [F4].Interior.ColorIndex = xlNone

CheckBox2_Click()
CheckBox3_Click()
CheckBox4_Click()

End Sub


je pense que cela devrait fontionner pour lancer toutes les macros 1,2,3,4

salut,
si cela te convient,
ajoute [résolu] dans ta 1ère annonce avec l'éditeur de messages
merci