Option Explicit
Sub Kontrollkästchen4_Klicken()
If Sheets("Matrix").Checkbox4.Value = True Then
Sheets("Matrix").Rows("3:22").Hidden = False
Else
Sheets("Matrix").Rows("3:22").Hidden = True
End If
End Sub
Problem: Checkbox4 soll Reihen sichtbar/unsichtbar schalten, läuft aber auf besagten Fehler.