I am trying to display multiselected list items into a text box.
That is what I am using right now and it displays a number instead of the value. I tried to change the Bound Column from 1 to 2 and still just a number in the text field.
Code:
Dim result as String
Dim varItem as Variant
With Me.lstType
If .ItemSelected.Count <> 0 Then
For Each varItem In .ItemSelected
result = result & .ItemsSelected(varItem) & vbNewLine
Next
End If
End With
Me.txtType.Value = result
That is what I am using right now and it displays a number instead of the value. I tried to change the Bound Column from 1 to 2 and still just a number in the text field.