Multi combo box

[charlee63]

This is my first time using Multi combo box.
I have a table named Vendor with a Multi combo box.

Data is
Vendor

AP Numbers 1
12003, 1240, 1561, 2296, 2308, 2693, 31198, 3257, 3913, 42716, 48628, 49589, 54329, 9506

How do I reference the numbers.

Function ShowControls()
Dim o As DAO.Recordset
Dim MyVendor1 As Variant

Set o = CurrentDb.OpenRecordset("Vendor")
MyVendor1 = o![Vendor Numbers 1]
qrySQLItems = "(((TblTeradata.Vendor) In (" & MyVendor1 & "))"

End Function

 

[Micron]

Kinda confusing.
You have a combo with a row source that is a multi valued field? That combo's bound field is the one you're trying to get the data from?
MyVendor1 is whatever record your recordset happens to open to? There must be more to your function than you're showing because it doesn't do anything.
You might want to reconsider the multi value field thing unless it's absolutely necessary. Lots of info on the subject that you can find. Here's one

Multivalued Fields - Mendip Data Systems

Database applications for businesses, schools and individuals

www.mendipdatasystems.co.uk