Bouton action case à cocher

Bonjour,

Sur ma feuille nommée « Paramètres » j’ai une cache à cocher
Je souhaite que lorsque je coche cette case , les lignes 25 à 31 de ma feuille s’affiche
et dans l’autre sens quand c’est décocher, elles se masquent

J’ai écrit ce code et affecté cette macro (dans « module 1 ») à la case à cocher n°5

Sub affiche_lait_achete()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(« Paramètres »)

If CheckBox5.Value = True Then
    ws.Rows("25:31").Hidden = False
Else
     ws.Rows("25:31").Hidden = True
End If

End Sub

Lorsque je lance la macro, j’ai une erreur d’exécution 424 Objet requis

Je ne vois pas où est le problème
auriez vous une idée ?

merci d’avance

Ellen25

hello
si ce sont toujours ces lignes pourquoi ne pas utiliser la méthode PLAN qui ne nécessite aucune programmation…
avant masquage

apres masquage

Taz067

l’outil que je construit est destiné à des gens qui savent tous juste saisir des données dans un fichier excel alors masquer/démasquer des lignes ou colonnes…comment dire
de plus il faut que je duplique l’action sur 50 cases …

J’ai trouvé le problème , je n’avais pas déclarer la cellule du format de contrôle et j’ai du adapter le code comme ceci
Sub affiche_lait_achete()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(« Paramètres »)

If Range("C11").Value = True Then
    ws.Rows("27:33").Hidden = False
Else
     ws.Rows("27:33").Hidden = True
End If

End Sub

1 « J'aime »