Hello Experts,
I wrote this one liner for my check box but is not working. What should I be doing to make it work?
Thanks for your help.
Asad
I wrote this one liner for my check box but is not working. What should I be doing to make it work?
Code:
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
Range(A1, A10).Interior.ColorIndex = 20
Else: Range(A1, A10).Interior.ColorIndex = xlNone
End If
End Sub
Thanks for your help.
Asad