Office: (Office 2016) VBA Daten aus zwei Tabellen in eine dritte kopieren

Danke für deinen Hinweis, leider verstehe ich nicht was du genau damit meinst?

 

Welchen denn ?
Mit der Anfügeabfrage ?

 

Hallo,
die ganze Tabellenstruktur kann so nicht stimmen. Eine Tabelle ohne Beziehungen mit 2 Fremdschlüsseln kann es in einer korrekten, normalisiert aufgebauten Datenbank nicht geben.

 

Guten Morgen,

@fredfred
Ja genau mit der Anfügeabfrage

@gpswanderer
Im weiteren Verlauf wird die Tabelle in Beziehung gesetzt

 

Also mit deinem Steno Style, möglichst wenig Info in einen Satz zu stecken, machst du niemandem eine Freude und nimmst mir die Motivation überhaupt weiter auf dein Problem einzugehen.

 

Hallo,

Das ist die falsche reihenfolge. Nach dem Erstellen der Tabellen werden zuerst die Beziehungen angelegt. Erst dann kann man mal über das weitere Vorgehen nachdenken.
Ohne Beziehung besteht auch die Gefahr dass inkonsistente Daten erfasst werden, auch mit einer Anfügeabfrage.

Und nicht zuletzt tragen vollständig angelegte Beziehungen für einen Außenstehenden zum Verständnis bei.

Dein Telegrammstil ist in der Tat nervig.

 

Ok, ich versuche mich zu bessern *wink.gif*

Wir beginnen einfach nochmal von vorne.
Ich habe nun die Beziehungen mit der neuen Tabelle hergestellt.

Wie Eingangs beschrieben habe ich ein Hafo und Ufo die mir meine gewünschten Daten anzeigen. Nun möchte ich per Button eine Beziehung zwischen meiner Tabelle tblSTD_Lag und tblfertSTDSL über die Tabelle tblAufPosfertSTD herstellen um mit diesen Daten in meinem Arbeitsblatt weiterzuarbeiten. Ihr habt mir den Tip mit einer Anfügeabfrage gegeben. Ich habe mir ein paar Videos angesehen, steige aber nicht dahinter wie ich das in meinem Fall machen könnte.

Vielen Dank

 

Das heißt du hast von Access null Ahnung

Geh in die Entwurfsansicht einer Abfrage. Dort ziehst du deine 3 Tabellen in den Entwurf. Auf Anfügeabfrage klicken, dort die 4te Tabelle angeben.
Die Felder (Id, Id-Lag) auswählen, als Ziel die 2 Felder aus der 4ten Tabelle.

Oder du passt den SQL-String an (Tabellennamen und Feldnamen):
Oder du stellst eine Beispiel-DB mit deinem TblKonstrukt bereit.


Code:

Deine Beschreibung ist nur die Wiederholung des bisher Gesagten.
Ich kann nach wie vor nicht nachvollziehen, was es bringt, die Primärschlüssel aus beiden Tabellen zu protokollieren.
Die Beziehungen zur 4ten Tabelle, halte ich im Gegensatz zu Klaus, für unerheblich.

 

Danke für deine Hilfe Fred,

ich würde gerne deinen ersten Vorschlag aufgreifen und es so probieren.
Am Ende möchte ich ja dabei etwas lernen um euch nicht mehr belästigen zu müssen.

Ich war bereits soweit und habe die Anfügeabfrage wie beschrieben erstellt.
Wie komme ich nun von meinem Formular über die Abfrage zu meinem gewünschten Ergebnis? Wie wird die Abfrage in mein Formular implementiert und gestartet?

 

Die Anfage wird ausgeführt.
Z.b Aufruf über Button, über VBA.

Die 4te Tabelle als Quelle für ein Formular.

Im Anhang mal deine DB

 

Die 4te Tabelle als Quelle? Woher weiß die Abfrage dann welche Daten ich anfügen möchte? Macht für mich keinen Sinn...

Mein aktuelles Formular hat die Tabellen STD_Lag und fertSTD als Quelle und fertSTDSL im Ufo

 

siehe oben, hochgeladenes Beispiel
Die Abfrage schiebt mit einem Rutsch alle Kombinationen in die 4te Tabelle.

Solltest du jeweils datensatzweise anfügen wollen, muß die Abfrage eingegrenzt werden.
Aber wie schon mehrmals angemeckert, deine Beschreibung ist sehr unvollständig.

 

Richtig, ich möchte nicht alle Datensätze in einem Rutsch anfügen. Nur den einen Datensatz aus meinem Formular.

In meinem Hafo wird mir ein Produkt aus einer Kundenbestellung angezeigt (tblfertSTD verknüpft über die Tabelle tblSTD_Lag zur Kundenbestellung).
Im Ufo wird mir ein Zwischenprodukt zu meinem Produkt dargestellt (tblfertSTDSL). Nun möchte ich mit Hilfe dieser Anfügeabfrage meine Kundenbestellung mit dem Zwischenprodukt in meiner 4ten Tabelle verknüpfen. In einem neuen Formular wird diese Verbindung als Arbeitsblatt zur Herstellung des Produkts verwendet. Somit ist mein Zwischenprodukt mit meinem Auftrag verknüpft.

 

Das Zwischenprodukt ist immer nur ein Datensatz ?
Das ist ein mühsames Fragespiel.
Lade das bitte als Beispiel hoch, ohne reale Daten.

 

Du legst einen Button (wie im Beispiel) auf deinem Formular an.
In VBA setzt du dir den Anfügestring dynamisch zusammen und führst die Abfrage aus.