Multiple List Box Selections code example
Example: vba listindex select multiple items vba
listbox.multiselection = fmMultiSelectExtended
listbox.Selected(index) = True
listbox.multiselection = fmMultiSelectExtended
listbox.Selected(index) = True