Concatenar valores de registros diferentes no Access

Esta dúvida não é muito frequente, mas como eu mesmo já precisei algumas vezes desta solução, vou postá-la aqui.

Trata-se da concatenação de valores localizados em linhas diferentes de uma tabela. Em um banco de dados relacional, é simples concatenar campos (Campo1 & "," & Campo2 & "," & Campo3), mas não é simples concatenar linhas diferentes (Linha1 & "," & Linha2 & "," & Linha3).

Estou anexando um exemplo que usa código VBA (tanto DAO como ADO) para percorrer linhas e criar um string com os produtos de cada categoria, separados por vírgula. O exemplo foi criado por mim anos atrás, mas será útil para quem precisar deste tipo de solução.