ListBox values past to query as parameters

[Lillian]

I would like to use ListBox values (1 or more) in a query
and need help with the code. I need to be able to use the
items in the list to filter the query.

So far I have this much...

Public Sub RowsSelected()
Dim ctlList As Control, varItem As Variant

Set ctlList = Forms!frmReports!filterbox
For Each varItem In ctlList.ItemsSelected
Debug.Print ctlList.ItemData(varItem)
Next varItem
End Sub

HELP! Please.

Lillian

 

[Sandra Daigle]

Hi Lillian,

See http://www.mvps.org/access/reports/rpt0005.htm for some sample code
which does this.