With:
Private Sub List1_Click()
MsgBox List1.ListIndex
End Sub
You can detect which item is clicked
With
List2.AddItem "blablabla"
you can add an item to the second listbox.
Or:
Private Sub List1_Click()
Select Case List1.Listindex
Case 0
msgbox "1st item"
Case 1
msgbox "2nd item"
Case 2
msgbox "3th item"
Case Else
msgbox "oeps dunno?"
End Select
End Sub
But here you have to know how many items are in List1!
PVBert
Junior Poster in Training
61 posts since Mar 2007
Reputation Points: 10
Solved Threads: 5