View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
shakeel_sadiq shakeel_sadiq is offline
external usenet poster
 
Posts: 1
Default Excel VBA Listbox


Hi All,

I have created a Listbox on a Userform. the Listbox properties are a
folows:

Name: SectorList
MultiSelect: fmMultiSelectMulti

I am trying to see which items were selected and then for these items
want to put their value into a cell. My problem is that once it find
the first item that was selected, it puts its value into the relevan
cell but then seems to mark all the other selected items as no
selected.

The weird thing is, for testing purposes, if i dont actually assign th
selected items value to a cell then there is no problems!

The code is as follows:

For lItem = 0 To sectorList.ListCount - 1
If sectorList.Selected(lItem) Then
ActiveCell.Value = sectorList.List(lItem)
ActiveCell.Offset(1, 0).Range("A1").Select
End If
Next

Any help would be really appreciated!

Shakee

--
shakeel_sadi
-----------------------------------------------------------------------
shakeel_sadiq's Profile: http://www.excelforum.com/member.php...fo&userid=3576
View this thread: http://www.excelforum.com/showthread.php?threadid=55538