Using ActiveX CheckBox Control to make a cell change colour and clear values

Hi everyone

I'm a total noob at VBA so please be nice

I'm developing a spreadsheet that has a series of ActiveX CheckBox controls.

With one in particular, I'm trying to get the checkbox to control what is displayed in a particular cell. What I want is this:

CheckBox checked: Change cell colour to red/pink, but only until a number is entered in it
CheckBox unchecked: Change cell colour back to 'no fill', and clear any values already typed in.

Here is the code I'm using:

Private Sub CheckBox29_Click()
Dim ChannelNo As Integer
    ChannelNo = Range("P50")
If CheckBox29.Value = True Then
   If IsEmpty(ChannelNo) Then
   ChannelNo.Select
   Selection.Interior.Color = RGB(255, 67, 67)
   Else:
   ChannelNo.Select
   Selection.Color.Index = xlNone
   End If
Else: ChannelNo = ""
End If
End Sub

Please forgive the terrible flow of it all, as I said this is my first crack at this and the code has been cobbled together by reading a bunch of various posts, none of which I fully understand - my knowledge of syntax is next to nil at the moment, but I'm working on it!

Cheers