Auto Scroll List Box Access 2000 VBA

[SonOf27]

I'm looking for some way to use VBA in Access 2000 to scroll my list boxes so the selected record is in view.

I am running a process that updates some fields shown on the list after a user has selected some records. It updates, refreshes the list then selects the next record on the list.

Unfortunatly when you re-query a list the top records are displayed. Simply selecting the record using something like Me.lstSuspend.S elected(varList + 1) = True correctly selects the record but does not bring it into view.

TopIndex does not work and I have been unable to find any other solution. I'm reluctant to use some sort of setfocus and send keys combination.

Any help yould be appreciated.

[Stewart Ross]

Hi. Sorry to say I reckon this one is a problem with A2000's implementation of listboxes, as using the listbox Select method in A2003 consistently brings the relevant listbox entry into view within the listbox itself. Wish I could suggest a workround for it...

-Stewart

[SonOf27]

Many thanks, I did not think there was a way of doing this. I have currently set the multi select to none which helps it to keep the current selection in view, however I would really like the users to be able to select multiple things at once. Oh well perhaps one day this company I work for will upgrade it's office suite, hellooo it is almost 2009 now.