How about something like this. I use this in my check register to insert a
"X" to show cleared transactions.

Double click on a cell within the range and a "X" is entered. Double click
on the same cell and the "X" is removed.

Option Explicit

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

Application.EnableEvents = False
On Error GoTo sub_exit
If Not Intersect(Target, Range("E2:E10000")) Is Nothing Then
With Target
If .Value = "X" Then
.Value = ""
Else
.Value = "X"
End If
End With
Cancel = True
End If
sub_exit:
Application.EnableEvents = True
End Sub

To use this...
Right click on the sheet tab where you want this to work
Select View Code
Copy/paste the above code into the window that opens
Close the window to return to Excel

The above code is set to work in the range E2:E10000. Change the range to
suit your needs.

--
Biff
Microsoft Excel MVP


"exceluser" wrote in message
...
As in checking things off (a tick) in that particular column...I am using
microsoft excel 2003.

Thanks