Hi Larry

The reason you have to click out of the cell and then back in is because
the selectionchange event only fires when the selected cell on the sheet
changes. There is no way around that as far as I know. Short of
replaciing the X's with checkboxes you could change the event slightly
so that it moves the selection to column B afer a cell is clicked eg:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo ErrorHandler
Application.EnableEvents = False
If Target.Count = 1 And Target.Column = 1 And Target.Row 1 Then
If Target.Value = "X" Then
Target.Value = ""
Else
Target.Value = "X"
End If
End If
Target.Offset(0, 1).Select
ErrorHandler:
Application.EnableEvents = True
End Sub

The user then only has to click once each time to change a cell.

Hope this helps
Rowan

Larry A wrote:
This works but has one unexpected behavior. Once you click on a particular
cell, you cannot successively click to toggle back and forth. One must
first click on some other cell and then back again. But it's close. Any
other thoughts? Any way to create a behavior the same as a check box?
Thanks!!