Listbox.ItemsSelected

[sassy2009]

Hello All,

I have got a listbox which lists the files from a network folder. I have set the multiselect property to Extended. What iam trying to do now is display the multiple file names from the listbox. The following is the code which i made but instead of returning the selected items value, the code displays NULL n number of times depending on the itemsSelected.count. For example it displays NULL 5 times if i have selected 5 items from the listbox. Please help.....

Dim frm As Form, ctl As Control
 Dim varItm As Variant
 
    Set frm = Forms!Listing
    Set ctl = frm!lstDisplay
    For Each varItm In ctl.ItemsSelected
        Debug.Print ctl.ItemData(varItm)
    Next varItm

[sassy2009]

Thanks Guys i just figured it out. Instead of using ItemData i now used Column(0,VarItm) and it worked.

Dim frm As Form, ctl As Control
Dim varItm As Variant
 
Set frm = Forms!Listing
Set ctl = frm!lstDisplay
For Each varItm In ctl.ItemsSelected
  Debug.Print ctl.ItemData(varItm)
Next varItm

[NeoPa]

Sassy,

Thanks for posting the solution. Finding that without any knowledge of what's in your Listbox columns would have been a little complicated ;)

Please remember also, that all code must be posted in [ CODE ] tags on this site.

NB. Although the explanation is correct, the code posted seems to be the original, unchanged, code.