Access VBA: Listbox scrollen

[Andreas]

Hallo,

ich hab folgendes Problem:
Ich habe ein Access Formular mit einer Listbox in der eine Tabelle aufgebaut wird (ListBox.Column(x,y) = "Bla").
Diese Tabelle kann sehr lang werden. Nun habe ich eine Suchen-Option eingefügt, die nach einem bestimmten Eintrag sucht und ihn per (ListBox.Selected(EintragZeile) = true) highlighted. Das Problem ist nun aber, dass die Anzeige nicht zu diesem Eintrag scrollt, sondern stehenbleibt. Die sendKeys-Funktion ist dabei Mist, weil mit {Down} dauert es zu lange und mit {PGDN} geht es nicht, weil das zu ungenau wird.

Frage: Gibt es eine Möglichkeit die Ansicht der Liste so springen zu lassen, dass die neu markierte Zeile ganz oben steht?

Irgendwie blöd zu erklären. Ich hoffe, ihr habt verstanden was ich meine!

Danke für eure Hilfe!

A.