bonjour,
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
Range("a45").EntireRow.Hidden = True
Range("a47").EntireRow.Hidden = True
Else:
Range("a45").EntireRow.Hidden = False
Range("a47").EntireRow.Hidden = False
End If
End Sub
si tu remplace ton code par ça
quand la checkbox est activer les ligne sont cacher si tu veux l'inverse faut juste inverser les "true" et "false"