I would like to make the the code below generic so to apply for a n
number of checkboxes. Obviously when n = 100
, you can't write down 100 identical Subs
each one for every checkbox.
Any comments or answers are appreciated!
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Range("B7:H7").Font.Strikethrough = True
Else
Range("B7:H7").Font.Strikethrough = False
Range("B7:H7").ClearContents
End If
End Sub