Order a list box in Access

[mp3909]

Is it possible to order a list box in access by tems that are selected (i.e. selected(i)=true) to be at the top?

The row source of my list box is a table.

But then I am looping through the items in the list box and selecting a few.

I then want the ones that I selected to be at the top.

[Minty]

Ignore me - I mis read the intention 1

[ranman256]

your method would require lots of code.
an alternate method would not. Instead of 1 multi-select box, use 2 listboxes:
1 source list (to pick from)
1 target list (chosen items)

I have a tPicked table so when the user dbl-clicks an item in the 'Available' list, it runs an append query and adds it to the 'Picked' list. (tPicked table)
no code needed.
You can even reduce the Available list by using an outer join query so the available list only shows what was Not in the Picked list.

[isladogs]

Ranman's solution is certainly valid.

But it wouldn't require lots of code to do what you said.
Add a hidden boolean field to your list.
In your listbox after update event, set the field true for items you select.
Then use a button_click event to update the listbox row source to sort by the Boolean field then by whatever field its normally sorted by.

You could do the re-sorting as well on your after update event but I think it would be confusing if the order changed on each click.

[moke123]

But then I am looping through the items in the list box and selecting a few.

Just to be clear, are you selecting the items in the list by clicking on them or are you iterating (looping) through the list box and setting certain items selected = true using code?

[Minty]

Seconded Ranman's answer.

A more common way of doing this (and more visually appealing) would be to "move" the selected items to another list, then run your actions against the second list.
I used a similar technique to select Employees I wanted to bulk update training records for. It was a long multi select list so you couldn't easily see who you had selected.

Moving them to another list made it obvious.

There is a demo here https://access-programmers.co.uk/for...d.php?t=165776
And a video to demonstrate here : https://www.google.com/search?q=acce...TF-8#kpvalbx=1

[isladogs]

With the demo by David Crake in Minty's post, you may get a warning about a missing reference to DatGrid.
Its not needed and can be removed.