Public Function UnionStr1(ID, Fam) 
''функция в общем модуле
    Static IDOld, FamUnion 
        If IDOld <> ID Then 
            IDOld = ID 
            FamUnion = Null 
        End If 
    FamUnion = (FamUnion + ", ") & Fam 
    UnionStr1 = FamUnion 
End Function

SELECT Таблица1.№карточки, Таблица1.Наим, Last(UnionStr1([наим],[инвном])) AS номер, Таблица1.цена, Sum(Таблица1.колво) AS [Sum-колво] 
FROM Таблица1 
GROUP BY Таблица1.№карточки, Таблица1.Наим, Таблица1.цена;