Hi,

Being relatively new to Excel, I've tried to implement some stuff for
setting a checkmark in cells when clicked.
I've found a solution for this at
http://www.mrexcel.com/archive2/1900/2145.htm which gives me the code found
below. The problem is that nomatter what I do it seems that the
Worksheet_SelectionChange is never called??? Could somebody give me a clue.

Option Compare Text
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B1:B20")) Is Nothing Then
If Target = "a" Then
Target = vbNullString
End
End If

If Target = vbNullString Then
Target.Font.Name = "Marlett"
Target = "a"
End If
End If

End Sub



Regards
Bo Rasmussen