Double-click any cell to add check marks.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Cancel = True
If Not Intersect(Target, Range("A1:AZ100")) Is Nothing Then
If Target = "P" Then
Target = vbNullString
ElseIf Target = vbNullString Then
Target = "P"
Else
End If
End If
End Sub


Formall text as Wingdings 2!!

HTH,
Ryan---
--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"rmann11" wrote:

I am trying to create a button or check mark so that when a user presses it a
number will appear, but when they 'deselect' the button or check mark that
number should become a 0 or a blank cell. I am very new to excel (as you can
probably tell) so any help would be amazing.