Get Values From Multi Select List Box

[Juan4412]

I am in need of a way to get the selected items from a multi select list box in VBA. I tried this syntax, but it gives me an error of type mismatch. What is the appropriate way to capture all selected values from a multi select listbox?

Private Sub Command14_Click()
    Dim I As Long
    For I = 0 To lstQB.ListCount - 1
        Debug.Print lstQB.Value(I)
	Next
End Sub

[pbaldy]

This shows the code:

http://www.baldyweb.com/multiselect.htm

You can do you debug inside the loop instead of setting the strWhere variable.

[Juan4412]

This shows the code:

http://www.baldyweb.com/multiselect.htm

You can do you debug inside the loop instead of setting the strWhere variable.

Using the syntax you linked to it gives me numeric values not the actual selected text.

edited text - if it makes a difference the control source for the multi-select listbox is a table that has two fields, a PK, and the value being displayed in the list box.

[orange]

See if this helps Allen Browne

[pbaldy]

You need to use the Column property, like:

ctl.Column(1, varItem)