Alle Elemente im Listenfeld auswählen (Access 97, 2000)

30.12.2003

Frage:

Bei meiner Adressverwaltung habe ich einen Etikettendruck eingebaut. Im Formular habe ich ein Listenfeld, das auf Mehrfachauswahl Erweitert eingestellt ist. Das Listenfeld enthält alle Adressen aus einer Tabelle.

Kann man mit einer Schaltfläche, die man zum Beispiel "Alle auswählen" nennt, alle Einträge der Liste markieren?

Antwort:

Access-97-Datenbank mit Demo-Datenbank

Ein Listenfeld hat für jeden Listeneintrag eine Eigenschaft namens Selected, die man lesen bzw. setzen kann. Wenn Sie die Mehrfachauswahl des Listenfeldes auf Einfach gesetzt haben, kann immer nur eine Selected-Eigenschaft den Wert True haben. Alle anderen Selected-Eigenschaften bleiben False.

Bei einem Listenfeld mit Mehrfach- bzw. Einzelauswahl können Sie mit einer For-Schleife alle Listeneinträge durchlaufen und die Selected-Eigenschaft auf True setzen:

Dim i As Integer

For i = 0 To Me!lstAuswahl.ListCount - 1
    Me!lstAuswahl.Selected(i) = True
Next i

Die ListCount-Eigenschaft ergibt die Anzahl der Einträge im Listenfeld.

Dienstleistungen

Als starker Partner an Ihrer Seite unterstützen wir Sie in folgenden Breichen:

Access-Programmierung

Benötigen Sie Unterstützung bei der Programmierung von Access-Anwendungen? Wir bieten die gesamte Bandbreite von der Access-Programmierung auf Stundenbasis bis zur Durchführung eines Software-Projektes als Auftragsarbeit an. Kontaktieren Sie uns für ein kostenloses Erstgespräch.

Software-Beratung

Haben Sie ein Software-Projekt und Sie wissen nicht, ob Access die richtige Plattform ist? Wir haben über 20 Jahre Erfahrung beim Erstellen von Windows-, Web und mobilen Anwendungen. Kontaktieren Sie uns für eine kostenlose Erstberatung.