Select the items programmatically

 

Private Sub SelectAllButton_Click()
    For r = 0 To ListBox1.ListCount - 1
        ListBox1.Selected(r) = True
    Next r
End Sub

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.	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

Select the items programmatically : ListBox « Forms « VBA / Excel / Access / Word