How do I get a field in excel to auto complete with a check mark

I have a check list in excel and wish to use check marks to siginify
completion of individual fields. How do I get excel to insert a checkmark
into a field when I double click that field?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
With Target
If .Value = "a" Then
.Value = ""
Else
.Value = "a"
End If
.Font.Name = "Marlett"
End With
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


--
HTH

Bob Phillips

"RichardZ" <[email protected]> wrote in message
news:[email protected]...
> I have a check list in excel and wish to use check marks to siginify
> completion of individual fields. How do I get excel to insert a checkmark
> into a field when I double click that field?