er der en group_concat funktion i ms-access?

Du bør spørge dig selv, om du har brug for en generisk løsning (en anden er af Allen Browne ) eller hvis du har brug for det bare til det nuværende formål. Hvis du virkelig kun har brug for det denne gang, så gør det på den nemme måde.

Som en sidebemærkning, når du sammenkæder lister i VBA-kode, skal du drage fordel af et trick, som jeg har lært mig af den mangeårige Access-guru Trevor Best, og det er at sætte afgrænsningstegnet i begyndelsen af ​​hver værdi og derefter bruge Mid() til at fjerne det. af. I stedet for dette inde i din loop gennem de underordnede poster:

  If Len(strOutput) = 0 Then
     strOutput = NewValue
  Else
     strOutput = strOutput & ", " & NewValue
  End If

...brug dette inde i løkken:

  strOutput = strOutput & ", " & NewValue

...og derefter, når du forlader løkken, fjern den forreste afgrænsning:

  strOutput = Mid(strOutput, 3)

Dette har implikationer overalt og forenkler kode til sammenkædning i en lang række sammenhænge.