Access-o-Mania

Access-Forum (Deutsch/German) => Tabelle/Abfrage => Thema gestartet von: henfoni am September 10, 2012, 15:40:31

Titel: Abfrage-Ergebnis "mergen"
Beitrag von: henfoni am September 10, 2012, 15:40:31
Moin,

habe folgenden Sachverhalt: Ich führe eine Abfrage aus, die folgendes Ergebnisse hat:

Prim_ID  Sec_ID  Text
...
11          273        moin
12          273        hallo
13          273        servus
..

Ich möchte die Abfrageergebnisse exportieren. Immer wenn eine Sec_ID mehrere Einträge hat, soll folgendermaßen exportiert werden:
ID     text
273  moin hallo servus

Also quasi ein Merge. Ist so etwas möglich?

Danke und Gruß
Titel: Re: Abfrage-Ergebnis "mergen"
Beitrag von: Wurliwurm am September 10, 2012, 16:54:55
Zitat von: henfoni am September 10, 2012, 15:40:31
Also quasi ein Merge. Ist so etwas möglich?

Wieso Merge? Hier geht es doch um eine Konkatenation von moin hallo servus

Hier ist m. E. eine Schleife nötig mit Gruppenwechselverarbeitung.
Titel: Re: Abfrage-Ergebnis "mergen"
Beitrag von: henfoni am September 10, 2012, 17:13:10
Moin, jo hast Recht, Merge ist falscher Ausdruck.

Habe leider nicht so richtigen Plan, wie du es meinst. Alles über VBA? Geht das auch einfacher als SQL-Abfrage?
Titel: Re: Abfrage-Ergebnis "mergen"
Beitrag von: oma am September 10, 2012, 20:06:14
Hallo,

die angeführte nFunktion könnte so aussehen:

Public Function SpalteZ(Feld As Long) As String

strSQL = "Select Bezeich FROM DeineTabelle WHERE ID =" & Feld
Set rs = DBEngine(0)(0).OpenRecordset(strSQL)
   Do While rs.EOF = False
       SpalteZ = SpalteZ & " " & rs!Bezeich & ", "
       rs.MoveNext
   Loop
End Function



und in einer Abfrage dann:


select ID, SpalteZ([ID]) AS Ausgabe
from Deine Tabelle
group by ID, SpalteZ([ID])


Gruß Oma
Titel: Re: Abfrage-Ergebnis "mergen"
Beitrag von: oma am September 12, 2012, 00:00:31
Hallo,

na, dann mit Beispiel...

Gruß Oma

[Anhang gelöscht durch Administrator]