Add items to ListBox : ListBox « Forms « VBA / Excel / Access / Word






Add items to ListBox

 

Sub ShowDialog()
    With UserForm1.ListBox1
        .MultiSelect = fmMultiSelectSingle
        .RowSource = ""
        .AddItem "January"
        .AddItem "February"
        .AddItem "March"
        .AddItem "April"
        .AddItem "May"
        .AddItem "June"
        .AddItem "July"
        .AddItem "August"
        .AddItem "September"
        .AddItem "October"
        .AddItem "November"
        .AddItem "December"
    End With
    UserForm1.Show
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.Assign the data in a worksheet to RowSource of a ListBox
4.Make sure the RowSource property is empty
5.Select the items programmatically
6.Get all selected items in a list box
7.Evaluating Which Items Are Selected in the Multiselect List Box
8.Determining the selected item
9.Get selected from ListBox
10.Get the selected items in a ListBox