Listboxes

  • Thread starter Thread starter johnny
  • Start date Start date
J

johnny

am conducting a survey and have created a bunch of
listboxes where users can select multiple items.

i.e. Please select all of the reporting tools you have
been trained in:
-then there is a pull down list box that contains a bunch
of applications they can choose from.

My question is this: If the user selects three different
applications, is there a way that the selected items can
be populated in another cell so that when I look at the
completed survey, i don't have to look for all of the
items they have highlighted? I can just look at this box
and see that they have selected application A, B, and C.

Thank You.
 
Try this:
Sub ListThem()
With ActiveSheet.ListBoxes(1)
For i = 1 To .ListCount
If .Selected(i) Then
j = j + 1
Cells(j, 3).Value = .List(i)
End If
Next
End With
End Sub

Bob Umlas
Excel MVP
 
Back
Top