Check and uncheck without leaving the cell

Hello,
Attached is a sample to add and delete "X" from a cell. The problem
is after a single click to add "X", to delete "X", the mouse pointer needs
to leave the cell then come back to cell to delete. I would like to add and delete
"X" by toggle the mouse without leaving the cell.

Thanks

I changed it to double click event...

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Intersect(Range("C1:C10"), Target) Is Nothing Then Exit Sub
If Target.Count <> 1 Then Exit Sub

If Target.Value = "" Then
  Target.Value = "X"
Else
  Target.Value = ""
End If

Cancel = True

End Sub

Hi Rocky,

I like to use the double click event better for this type of X or not X. My normal is to double click in Column A with this code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column <> 1 Then GoTo Ender
    If Target.Row = 1 Then GoTo Ender
    If Target = "x" Then
            Target = ""
    GoTo Ender
    End If
    If Target = "" Then
            Target = "x"
    End If
Ender:
    Cancel = True
End Sub