Access - Listenfeld - Mehrfachauswahl

[Mondling]

Moin..

Also ich sitze hier vor einem ziemlich blöden Problem..ich habe ein Kombinationsfeld aus der man eine Gruppe auswählen kann, welche dann als Kriterium für eine Abfrage dient, deren Ergebnis in einem Unterformular ausgegeben wird.

Jetzt soll aber die Möglichkeit zur Auswahl mehrerer Gruppen gegeben werden.

Also möchte ich das Kombinationsfeld in ein Listenfeld mit Mehrfachauswahl

ändern.

Mein Problem ist nun, wie ich nun die Abfrage gestalte..

Wie bekomme ich, wenn ich Gruppe 1, 5 und 6 auswähle auch nur die Daten für Mitglieder dieser Gruppe im Unterformular angezeigt?

*seufz* bin doch erst im 1. Lehrjahr

Hoffe jemand kann mit helfen

Gruss

Steffi

[Meenzer]

Hallo!

Also Du erstellst Dir eine neue Listbox in der Du die Mehrfachauswahl aktivierst und wo Deine Gruppen drinstehen. Um nun die Daten in Deinem UFo anzuzeigen kannst Du, zB mit nen Button Dir die Daten holen:

-----------------------------------------------------------------

Dim Gruppe As String

Dim i As integer

For i = 0 To DeineListbox.ListCount - 1

If DeineListbox.Selected(i) Then Gruppe = Gruppe & DeineListbox.ItemData(i) & ","

Next i

'jetzt hast Du alle Gruppen in Deinem String und musst das letzte KOmma 'abschneiden

If Gruppe <> "" Then Gruppe = Left(Gruppe, Len(Gruppe) - 1)

'Daten anzeigen

DeinUFo.recordsource = "SELECT * FROM TABELLE WHERE BLA IN(" & Gruppe & ");"

---------------------------------------------------------------------------

So könnte das (hoffentlich) gehen.

Gruß

[Mondling]

Original geschrieben von Meenzer

'Daten anzeigen

DeinUFo.recordsource = "SELECT * FROM TABELLE WHERE BLA IN(" & Gruppe & ");"

---------------------------------------------------------------------------

So könnte das (hoffentlich) gehen.

Gruß

Erst mal herzlichen Dank Meenzer

Soweit nimmt mein Access das an...

Hab nur noch irgendwie Probleme mit der letzten Zeile...

(ja ich hab die Bla etc. Stellen ersetzt)

Irgendwas stört den daran...krieg immer die Meldung :

"Sie haben die vorherige Operation abgebrochen".. *grübel*

Gruss

Steffi

[robotto7831a]

Hallo,

sprichst Du auch das richtige Unterformular an?

Frank

[Mondling]

Hi Frank..

Ja.. . *seufz* denke aber das liegt mit am den vielen anderen Abfragekriterien, die noch zu dem UFo gehören, daß das nicht funktioniert...hab so ungefär 4 Rahmen mit Optionsfelder und 3 Kombiboxen, die das was da im UFo angezeigt wird noch einschränken...

Naja...hab das mit dem Listenfeld jetzt einfach erstmal umgangen ...ist nicht wirklich schön, funktioniert aber ...

aber interessieren wies geht tuts mich trotzdem...

Gruss Steffi