?B?RlZD?= wrote

Can I format (via Macro???) a cell so that if the user left clicks on
the cell a check mark appears without using the Control Toolbox. The
cells with such format will only need to then be the totaled (via
=counta(x:x).

Something like this in a WorkSheet module:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Target.Count 1 Then Exit Sub
With Selection
..Value = Chr(252): .Font.Name = "Wingdings"
End With
End Sub


--
David