Add names of all open workbooks to the list box

 
Sub UserForm_Initialize()
    Dim wkBook As Workbook
    For Each wkBook In Workbooks
        lstWorkbooks.AddItem wkBook.Name
    Next
End Sub

1.	Add item to List Box
2.	Add items to ListBox
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

Add names of all open workbooks to the list box : ListBox « Forms « VBA / Excel / Access / Word