Selectively Sort List

[Don Wells]

I want to allow the user to reposition items in a list. I feel that the most user friendly approach is that used by Windows (XP) in allowing the user to change the position of a program name in the list of programs (see attachment). Is there a technique that will emulate this in VBA?

TIA

[HansV]

See the attached example, based on an example by Excel MVP Rick Rothstein.
Hold down Shift to drag a list box item to a different position; there is no visual feedback while dragging.

Note: this will only work with a list box that has been populated by AddItem or by setting its List. It won't work if the list box is bound to a range of cells.

ListBoxDragDrop.xls

[Don Wells]

Thank you Hans