Listenfelder übertragen

Hallo,

habe folgendes Problem:

Ich habe in einem Formular zwei Listenfelder eingefügt. In einem Listenfeld werden Daten aus einer Tabelle angezeigt. Der User kann dort max. 4 Bereiche auswählen und wenn man auf ein Button klickt, werden die ausgewählten Sachen im 2. Listenfeld angezeigt. Wenn man dann nochmal auf einen anderen Button klickt werden diese Info´s in einer anderen Tabelle abgelegt.

Wo kann ich dafür ein VBA-Code bekommen ?

Danke im voraus.
Gruß, Marsi

Willst du deine vorhandenen Daten filtern oder sie wirklich in eine neue Tabelle umkopieren?

Was das Kopieren angeht, dann halt:

Private Sub Button\_Click()
 Currentdb.Execute "INSERT INTO DeineTabelle (Feld1,Feld2) VALUES('" \_
 & Me!Listenfeld1 & "','" & Me!Listenfeld2 & "')"
end sub

oder ähnlich - wobei man zum einen die Felddatentypen berücksichtigen muss, zum anderen sich solche Kopieraktionen gut überlegen sollte.

Gruß aus dem Norden
Reinhard Kraasch

(http://www.dbwiki.de - das Datenbank-Wiki)