How to Select the entered values from the Multiselect listbox using vba code

Question

I have a Textbox and a MultiSelect listbox with following values

When i enter the values in the text box and click on search it should select the particular values in the listbox. I'm Using the below code

Private Sub Search_Click()
Dim str As String
Dim c As Collection
Dim strArray() As String
Dim intcnt As Integer

str = txtAnswer.Value
strArray = Split(str, ",")

For Each itm In strArray
lstAnswer.Selected (itm)= True
Next
End Sub

I want to get the below result

But It selects the index instead of values. for Example

How to select the values instead of index?

R3uK · Accepted Answer · 2015-11-23 07:14:38Z

1

Private Sub Search_Click()
Dim ItM As String
Dim c As Collection
Dim strArray() As String
Dim intcnt As Integer


strArray = Split(txtAnswer.Value, ",")

With lstAnswer
    For Each ItM In strArray
        For i = 0 To .ListCount - 1
            If .List(i) <> ItM Then
            Else
                .Selected(i) = True
                Exit For
            End If
        Next i
    Next ItM
End With

End Sub

answered Nov 23, 2015 at 7:14

R3uK

14.6k8 gold badges49 silver badges81 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Gustav · Accepted Answer · 2015-11-23 07:10:24Z

1

This code of yours selects by item, not value:

For Each itm In strArray 
    lstAnswer.Selected(itm) = True 
Next

To select by value, for each value loop the list values and, if found, mark the found item as selected.

answered Nov 23, 2015 at 7:10

Gustav

56.3k7 gold badges33 silver badges65 bronze badges

2 Comments

user2514925 Over a year ago

Thank you for the response it would be helpful if you share the sample code

Gustav Over a year ago

True, but I figured you could found out yourself having the method. But @R3uK served if for you.

Collectives™ on Stack Overflow

How to Select the entered values from the Multiselect listbox using vba code

2 Answers 2

Comments

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related