right clicking to make check marks

The code below was offered earlier by moderator, Davesexcel. I am hopeful that someone can expand on this code to apply this technique to two or more non-contiguous ranges. Instead of just working for range A1:A10, I'd like to see how the check marks can be inserted in range A1:A10 and in range C1:C10.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    If Union(Range("$A1:$A10"), Target).Address = Range("$A1:$A10").Address Then
        Cancel = True
        If Target <> "a" Then
            With Target.Font
                .Name = "Webdings"
                .Size = 10
            End With
            Target.FormulaR1C1 = "a"
    Else: With Target.Font
            .Name = "Webdings"
            .Size = 10
        End With
        Target.ClearContents
    End If

End If

Thanks in advance

Hello Conor,

Provided the data in "C" is the same as "A" then a simple change will do it.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    If Not Target Intersect(Range("A1:A10"), Range("C1:C10")) Is Nothing Then
        Cancel = True
        If Target <> "a" Then
            With Target.Font
                .Name = "Webdings"
                .Size = 10
            End With
            Target.FormulaR1C1 = "a"
    Else: With Target.Font
            .Name = "Webdings"
            .Size = 10
        End With
        Target.ClearContents
    End If

End If

Sincerely,,
Leith Ross

Leith,

Thank you, but that did not work. I get a generic "syntax error" when I substitute your line for the original. But I realize my original post was not terribly informative. The original post earlier today was titled "radio buttons" in case you want to refer to it. But the way the original code works, there is no data in A1:A10 and if I expand it, C1:C10 would also be empty. I want to use the check marks to sum, count, etc. the adjacent cells in columns B, D, etc with a sumif, countif, etc.

Thanks again.

Hello Conor,

In that case, it would be better if you continue this discussion with Dave, since he is already familiar with what you want to do and the previous post.

Sincerely,
Leith Ross

I appreciate your time and effort.

Conor

Shazam!! Thanks. That is exactly what I wanted.

Conor