Determining the selected item : ListBox « Forms « VBA / Excel / Access / Word

Determining the selected item

  Private Sub OKButton_Click()
      Dim Msg As String
      Msg = "You selected item # "
      Msg = Msg & ListBox1.ListIndex
      Msg = Msg & vbNewLine
      Msg = Msg & ListBox1.Value
      MsgBox Msg
      Unload UserForm1
  End Sub


Related examples in the same category

1.Add item to List Box
2.Add names of all open workbooks to the list box
3.Add items to ListBox
4.Assign the data in a worksheet to RowSource of a ListBox
5.Make sure the RowSource property is empty
6.Select the items programmatically
7.Get all selected items in a list box
8.Evaluating Which Items Are Selected in the Multiselect List Box
9.Get selected from ListBox
10.Get the selected items in a ListBox