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.....

Expand|Select|Wrap|Line Numbers

 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.

Expand|Select|Wrap|Line Numbers

 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.

Listbox.ItemsSelected

re: Listbox.ItemsSelected

re: Listbox.ItemsSelected

Similar Microsoft Access / VBA bytes

/bytes/development

/bytes/it

/bytes/about