Two/ three list box, when selected one

[johnseito]

Hello,

I actually have 4 list box.
They all have data in there that are related but shows different information. When a user selects one of them. I want the other three to
highlight the data that is of what they selected in the three other list box and then move it to the top of the list.

In the list box that they selected I want the user to be able to un-select the list and the data in the other three list box goes back to normal. However each time they make a selection to the list it highlights the related value from the other three list box and move it to the top of the list.

One catch sometimes the list box can only have one value. Only one list box is allow selection.

Can this be done. Please advise ?
Thanks

[ranman256]

combo 2 source uses combo1 as criteria in the query
but you must refresh combo2 when combo1 is chosen....
cboStates has all state names. When user picks a state, the cboCity must be refreshed
cboCity.rowsource = qsCities1State
sql= select City from tCities where [state]=forms!myForm!cboState

'----------------
sub cboState_Afterupdate()
'----------------
cboCity.requery
end sub

do this for the 3 sub boxes.

[Gicu]

I think the trick is to add a calculated field in the row sources for the three list boxes dependant on the selectable one called IsSelected:iif([MyID] = Forms!MyForm!lstSelect.Column(x),"Y","N") where x is the zero-based index of the could holding the ID that relates the data and sort descending on that first before any other sort order.
Then after your selection you requery each of the listboxes to move the related data first then you select it:

Forms![MyForm].Controls("lstBox1").Selected(0) = True
Forms![MyForm].Controls("lstBox2").Selected(0) = True
Forms![MyForm].Controls("lstBox3").Selected(0) = True

Cheers,
Vlad