Try using the Checkbox1_AfterUpdate() event with the
following logic:

Private Sub cbxEnablePipette2_AfterUpdate()
If Checkbox1.value = true then
'add the item
Else
'remove the item
End If
End Sub

Hope that helps...

-----Original Message-----
I would like the code to insert a name into a list box if
the check box is checked and remove it if it is
deselected. How could I do this.

thanks in advance.

Joe

Private Sub CheckBox1_Click()


If count Mod 2 = 0 Then
List.AddItem "Manning, Joe"
Else
List.RemoveItem (List.ListCount)
End If
count = count + 1


End Sub
.