using the mulit-select feature in a list box

[brian30]

i'd like to be able to select multiple values in a list box but when i set the list box's multi-select feature to simple or extended neither work.

i'm sure i'm commiting a simple error.

bt

 

[shmiller]

What's the problem you are having? Give some more details.

 

[brian30]

i'm trying to get a list box on a form to allow me to select more than one value. i understand that i need a vba function to allow me to do this. so if have a snipit of code that loops throught the list of values and selects the multiple values and inserts them into the table, that would be swell.

bt

 

[shmiller]

Assume a list box named list1

Dim varItm As Variant

For Each varItm In list1.ItemsSelected
MsgBox list1.ItemData(varItm)
'Do your insert here for each item

Next varItm