I have 1 check box that locks and unlocks a range. Inside that range I have additional checkboxes that I want locked down with the range. How does one do this? =oP
Here's what I have, so you know:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
ActiveSheet.Unprotect
Range("A11:J23").Locked = False
Range("A11:J23").Interior.ColorIndex = 0
ActiveSheet.Protect
Else
ActiveSheet.Unprotect
Range("A11:J23").Locked = True
Range("A11:J23").Interior.ColorIndex = 15
ActiveSheet.Protect
End If
End Sub
Here's what I have, so you know:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
ActiveSheet.Unprotect
Range("A11:J23").Locked = False
Range("A11:J23").Interior.ColorIndex = 0
ActiveSheet.Protect
Else
ActiveSheet.Unprotect
Range("A11:J23").Locked = True
Range("A11:J23").Interior.ColorIndex = 15
ActiveSheet.Protect
End If
End Sub