Listeinträge markieren und dann zum Ersten Eintrag

10/07/2009 - 00:03 von Hubert Holler | Report spam
Ich markiere alle Eintràge einer Listbox mit folgendem Code:

Do While i < Me.kundengruppe.ListCount '.ItemsSelected
Me.kundengruppe.Selected(i) = True
i = i + 1
Loop

Danach befinde ich mich aber am Ende der Liste. Wie kommt man danach wieder
zum Beginn der Liste.

Vielen Dank für jede Antwort
 

Lesen sie die antworten

#1 Karl Donaubauer
10/07/2009 - 00:58 | Warnen spam
Hubert Holler wrote:
Ich markiere alle Eintràge einer Listbox mit folgendem Code:

Do While i < Me.kundengruppe.ListCount '.ItemsSelected
Me.kundengruppe.Selected(i) = True
i = i + 1
Loop

Danach befinde ich mich aber am Ende der Liste. Wie kommt man
danach wieder zum Beginn der Liste.



Was meinst du mit "befinde ich mich"?
Die Liste sollte wegen dieser Schleife nicht scrollen.
Zumindest kann ich das in A03 nicht nachvollziehen.
Oder meinst du das programmiertechnisch auf Selected bezogen?

Du kannst in beiden Fàllen versuchen, ob das dich wieder
an den Anfang der Liste bringt:

'Falls sich der Fokus nicht dort befindet, dann zuerst
'Me!kundengruppe.SetFocus

Me!kundengruppe.ListIndex = 0

HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com

Ähnliche fragen