Simon

What else have you tried?

What you need to do is loop through each item in the list box and check
if it is selected then remove it if it is.

Code:
--------------------

Dim I As Integer

For I = ListBox1.ListCount - 1 To 0 Step -1
If ListBox1.Selected(I) = True Then
ListBox1.RemoveItem I
End If
Next I
--------------------


--
Norie
------------------------------------------------------------------------
Norie's Profile: http://www.excelforum.com/member.php...o&userid=19362
View this thread: http://www.excelforum.com/showthread...hreadid=384197