finns det en group_concat-funktion i ms-access?

Du bör fråga dig själv om du behöver en generisk lösning (en annan är av Allen Browne ) eller om du behöver det bara för det aktuella syftet. Om du verkligen bara behöver det en gång, gör det på det enkla sättet.

En sidoanteckning, när du sammanfogar listor i VBA-kod, dra fördel av ett trick som jag lärt mig av den långvariga Access-gurun Trevor Best, och det är att sätta fast avgränsaren i början av varje värde och sedan använda Mid() för att ta bort det av. Istället för detta i din loop genom underordnade poster:

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

...använd detta inuti slingan:

  strOutput = strOutput & ", " & NewValue

...och sedan när du lämnar slingan, ta bort den inledande avgränsaren:

  strOutput = Mid(strOutput, 3)

Detta har implikationer överallt och förenklar kod för sammanlänkning i en mängd olika sammanhang.