hello

can anyone tell me what is going wrong with the following code.

when I have multi items selected when it executes the red line it
clears all of the selections in my listbox, however this code works
fine on a sample workbook and I cannot see any difference with listbox
properties etc - HELP!!!

Dim lItem As Long
For lItem = 0 To Me.lbManifestCurrent.ListCount - 1
If Me.lbManifestCurrent.Selected(lItem) = True Then
Worksheets("Freight Accrual
History").Range("C65536").End(xlUp)(2, 1) =
Me.lbManifestCurrent.List(lItem)
Me.lbManifestCurrent.Selected(lItem) = False
End If
Next


--
apndas
------------------------------------------------------------------------
apndas's Profile: http://www.excelforum.com/member.php...o&userid=36137
View this thread: http://www.excelforum.com/showthread...hreadid=564054