place this codes in a regular module
function combineSpec(vId as variant) as string
dim rs as dao.recordset, strSpec as string
strSpec=""
set rs=currentdb.openrecordset("select spec from tablename where customer_id=" & vId)
do until rs.eof
strSpec=strSpec & "," & rs("spec")
rs.movenext
loop
combinespec=mid(strSpec,2)
end function
now create a query
select customer_id, combineSpec([customer_id])
from tableName
group by customer_id, combineSpec([customer_id])