Office: DS zusammenfassen

Hi, wenn ich mich da mal einmischen darf... *wink.gif*

DB.Close ist insofern Unfug, da es sich auf die aktuelle DB bezieht. Access ist aber so nett, diesen Befehl zu ignorieren! *biggrin.gif*

 

Hänge mich mal hier rein.

Möchte auch Datensätze zusammenfügen.
Nach Datum. Die Datei oben ist wohl zu alt und geht nicht mehr

Tabelle1
Datum Feld2
12.11.19 text1
14.11.19 text2
14.11.19 text3
15.11.19 text4

Tabelle2
Datum Feld2
12.11.19 text1
14.11.19 text2; text3
15.11.19 text4

 

Bevor sich jemand die 16 Beiträge vorher antut: Eröffne ein neues Thema und verweise notfalls auf das alte!

 

Einfach mal diesem Link folgen (der war auch weiter oben schon gepostet, ist aber vielleicht ein bisschen untergegangen):
VBA Tipp: Liste per SQL aufbauen – DBWiki
maike

 

Den Link bin ich schon gefolgt. Zunächst aber überfordert.
Da hätte die weiter oben angehängte Datei evtl. zur Verständigung geholfen. Aber die geht leider nicht mehr. Ach sehe grade dort liegt auch ein Beispiel.

Hatte gehofft das ich die Lösung leichter bekomme durch Abfragen oder andere Module. Danke.

 

Das gezeigte Modul einfach in ein allgemeines Modul kopieren, darauf achten, das Modul nicht genauso zu nennen wie die Funktion.
Danach wie beschrieben in der Abfrage einsetzen.
Das sieht komplizierter aus als es ist.

 

wie müsste die Abfrage in etwa aussehen, wenn die Daten in etwa so vorliegen:
Tabelle1
Datum Feld2
12.11.19 text1
14.11.19 text2
14.11.19 text3
15.11.19 text4

Tabelle2
Datum Feld2
12.11.19 text1
14.11.19 text2; text3
15.11.19 text4


würde mich dann mal durchtest. Danke.

 

In einem neuen Feld im Abfrageentwurf:
Code:

maike

 

Hallo,
siehe auch:
Abfrageergebnis mehrere Ergebnisse in ein Feld schreiben

 

Herzlichen Dank für die direkte Hilfe.
Damit kann ich sicher mein Problem lösen.

 

Code:

Technisch ist das markierte Feld für die SQL-Anweisung in SQLListe ein Wert von außen und muss daher (wie gewohnt) SQL-gerecht formatiert werden: Datum an SQL-String übergeben
Sowie: Qualifizierung der Felder über Tabellenbezeichner/-aliase machen das dann auch lesbarer und nachvollziehbarer.

 

Danke damit sollte ich alles an der Hand haben.
Melde mich nochmal wenn ich nicht weiter komme.

 

Ich hatte mir mal die Beispieldatenbank von hier geladen.
Dort kann man ja mal gut testen und lernen.

Dort wird ja nun die ProjektNummer zweier Tabellen verglichen und dann ein Zellwert genommen und zusammengepackt.
Das wird dort so gemacht:

=SQLListe("SELECT Format(Datum,'yyyy-mm-dd') As D, Beschreibung FROM tblProjektSchritt WHERE Projektnummer = '" & [Projektnummer] & "'";Zchn(13) & Zchn(10);" ")

Jetzt wollte ich einfach mal versuchen das ganze nach Datum zu machen.
Dazu hatte ich die eine Tabelle um das Feld Datum erweitert in der anderen gab es schon ein Datum Feld. Zusätzlich im Formular das Feld ProjektNummer zu Datum geändert. Und dann den Ausdruck oben abgeändert:

=SQLListe("SELECT Format(Datum,'yyyy-mm-dd') As D, Beschreibung FROM tblProjektSchritt WHERE Datum = '" & [Datum] & "'";Zchn(13) & Zchn(10);" ")

Schon bei dieser leichten Änderung bekomme ich Fehler. Lassen wir mal die Beispieldatei und kommen noch einmal zu meinem Projektschen:

Bei meiner Tabelle 1 der Quelle (Lieferungen) habe ich mal zum Test nur das Feld Rohstoff und als Datum das Feld Liefertermin2

Dort sind 3 Datensätze drin mit unterschiedlichen Liefertermin zwei kommen am 22.11.2019 und eins am 03.12.2019.

Jetzt möchte ich gern mit Tabelle 2 (Daily Schedule) das Datum (Feld1) mit dem Datum (Feld: Liefertermin2) aus Tabelle 1 (Lieferungen) vergleichen und gibt es Treffer dann dieses Ergebnis in das Feld "Lieferungen" in der Tabelle Daily Schedule. Und mit SQL sollten dann auch mehrere Treffer an einem Tag darstellbar sein.

Für mich ist das leider nicht so einfach. Danke für eure Geduld.

 

Lad mal eine kleine Muster-Datenbank mit den zwei Tabellen hoch, wenn's geht im Format .mdb.
maike

 

Das mach ich gern, wenn ich morgen wieder auf der Arbeit bin . Ich reduziere mal das Projekt auf das nötigste und lade es hoch.