Anfügeabfrage mit Kombinationsfeldern

Hi,
da hat die vorherige Funktion endlich geklappt, schon sitz ich am nächsten Problem, was ebenfalls mit Visual Basic recht einfach lösbar wäre…behersch ich nur leider nicht und die versuchten Umwege möchten einfach nicht funktionieren.
Also ich habe ein Formular mit 2 Kombinationsfeldern. Die haben verschiedene Tabellen als Grundlage. Die Kombinationsfelder enthalten jeweils den Primärschlüssel der Tabelle und noch weitere triviale Daten zur einfachen Identifizierung des Datensatzes durch den Benutzer.
Jetzt habe ich eine 3. Tabelle, deren Primärschlüssel zusammengesetzt ist aus den beiden der 1. und 2. Tabelle.
Nun möchte ich in Feld 1 der 3. Tabelle den Primärschlüssel von dem in Kombinationsfeld 1 ausgewählten Datensatz anfügen. In Feld 2 soll der Primärschlüssel von dem in Kombinationsfeld 2 ausgewählten Datensatz dazu angefügt werden.
Habe das Ganze mehrfach mit Abfragen probiert, aber komme einfach nicht weiter. Es scheint recht einfach zu sein mit einem Button, der Daten in einer Tabelle anfügt, doch werde ich nicht gefragt welche Daten in welche Tabelle ich anfügen möchte und Visual Basic behersche ich wie gesagt nicht. Ist es überhaupt möglich das ordentlich zu machen oder muss ich über Umwege gehen?

Gruß Michael

Hi Michael,

da hat die vorherige Funktion endlich geklappt, schon sitz ich
am nächsten Problem, was ebenfalls mit Visual Basic recht
einfach lösbar wäre…behersch ich nur leider nicht und die
versuchten Umwege möchten einfach nicht funktionieren.
Also ich habe ein Formular mit 2 Kombinationsfeldern. Die
haben verschiedene Tabellen als Grundlage. Die
Kombinationsfelder enthalten jeweils den Primärschlüssel der
Tabelle und noch weitere triviale Daten zur einfachen
Identifizierung des Datensatzes durch den Benutzer.
Jetzt habe ich eine 3. Tabelle, deren Primärschlüssel
zusammengesetzt ist aus den beiden der 1. und 2. Tabelle.
Nun möchte ich in Feld 1 der 3. Tabelle den Primärschlüssel
von dem in Kombinationsfeld 1 ausgewählten Datensatz anfügen.
In Feld 2 soll der Primärschlüssel von dem in Kombinationsfeld
2 ausgewählten Datensatz dazu angefügt werden.
Habe das Ganze mehrfach mit Abfragen probiert, aber komme
einfach nicht weiter. Es scheint recht einfach zu sein mit
einem Button, der Daten in einer Tabelle anfügt, doch werde
ich nicht gefragt welche Daten in welche Tabelle ich anfügen
möchte und Visual Basic behersche ich wie gesagt nicht. Ist es
überhaupt möglich das ordentlich zu machen oder muss ich über
Umwege gehen?

wenn du beim Ereignis „beim Klicken“ eines Buttons folgendes als VBA-Code eingibst, wird es funktionieren:

‚---------------------------------
sql = „INSERT INTO Tabelle3 ( ID_Feld1, ID_Feld2 ) SELECT '“ & Me.Pulldown1.column(0) & "‘ AS Ausdr1, ‚" & Me.Pulldown2.column(0) & "‘ AS Ausdr2, *;"

DoCmd.RunSQL sql

'drittes Pulldownfeld neu abfragen, damit die Änderung
'auch angezeigt wird!
Me.Pulldown3.requery

'---------------------------------
Kurze Erläuterung, da du meine Bezeichnungen entsprechend deinen Feldbezeichnugen ändern mußt:

Tabelle3 = deine 3. Tabelle in der die Daten gespeichert werden sollen
ID_Feld1 = Feldbezeichnung der 3. Tabelle für ID von Feld1
ID_Feld2 = Feldbezeichnung der 3. Tabelle für ID von Feld2
Pulldown1= Feldbezeichnung für das erste Pulldownfeld
Pulldown2= Feldbezeichnung für das zweite Pulldownfeld

Column(0) = erste Spalte der Pulldownfelder, ggf. anpassen, wenn die ID in einer anderen Spalte sein sollte.
WICHTIG: die Spaltenzählung fängt mit 0 an!!

Grüße aus Essen
Wolfgang

Yay klappt, jetzt fügt der je nach Auswahl entsprechend an und doppelte Datensätze werden vom Programm selbst unterbunden :smiley: Dankeschön, da wär ich ewig nit drauf gekommen ^^