Add data to listbox by VBA

[Jack_sparrow007]

Hi All,



This is my first post,

I have two list box LISTBOX1 AND LISTBOX2 and a table which contains two columns COLUMN A & COLUMN B.

LISTBOX1 contains unique data of COLUMN A.

When I click particular data in LISTBOX1, Needs to apply filter in COLUMN A based on selected data. and pick the unique data of COLUMN B needs to insert into LISTBOX2.

I am new to Access, don't know how to " apply filter and get unique values and insert into LISTBOX2"

Thanks in Advance

[TG_W]

Sounds like you want what is called "Cascading Combo Boxes", or in your case, List boxes.

The attached has an example using cascading combo boxes, but you should be able to just change the object to a list box.

[Jack_sparrow007]

Its not working,

Instead of apply filter, does it possible to run queries when i click data in list box 1.

[TG_W]

Yes. You would just change the AfterUpdate code to

 docmd.openQuery "YourQueryNameHere"

[Jack_sparrow007]

Yes. you are right, But the criteria for query may vary each time, we select any data in listbox1 during run time.
ex :

'SELECT DISTINCT COL2
FROM [Table1]; where COL1 =' LIST1.VALUE

[TG_W]

Then you would set the boundary in your query based on the value in List1, not in the VBA. Use this reference in your query of COL1 of Table1 (based on your response) -
[Forms]![YourFormNameHere]!
[List1]

[TG_W]

Forms!YourFormNameHere!List1

Don't know why it looks funny in the first response. Use brackets around each group.

[Jack_sparrow007]

when I execute a query , it has shown in seperate window, not added in Listbox.

Any Idea to insert such data into listbox.

[TG_W]

If the query is the data source to your list boxes, it should not show in a separate window.

Can you make a copy of your database, remove confidential information, and share it for further analysis?