Color cell if checked

[oxicottin]

I have a cell M24 that I would like to color yellow if a check box (chkFivePoints) is true. How can I do this? Thanks....

 

[Rick Rothstein]

I have a cell M24 that I would like to color yellow if a check box (chkFivePoints) is true. How can I do this? Thanks....

Where is the checkbox located at... on a UserForm or directly on the worksheet?

If on the worksheet, what type of checkbox is it... Forms or ActiveX?

 

[My Aswer Is This]

Try this:
Assuming several things

Private Sub chkFivePoints_Click()
'Modified  7/23/2018  12:21:48 PM  EDT
    If chkFivePoints.Value = True Then
        Range("M24").Interior.Color = vbYellow
        Else
            Range("M24").Interior.Color = xlNone
    End If
End Sub

 

[oxicottin]

That worked great thank you....


Rick, The Checkbox was an active X.... I just placed it next to a merged cell. Thanks!

 

[Rick Rothstein]

Rick, The Checkbox was an active X.... I just placed it next to a merged cell. Thanks!

Try using this for the checkbox's Click event (if you are typing this instead of copy/pasting, be sure to note the minus sign in front of the number 6)...

Private Sub chkFivePoints_Click()
  Range("M24").Interior.ColorIndex = -6 * chkFivePoints.Value
End Sub

 

[My Aswer Is This]

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

That worked great thank you....


Rick, The Checkbox was an active X.... I just placed it next to a merged cell. Thanks!