Объединение строк в таблице

[Lazietow]

Всем привет. У меня есть таблица с двумя колонками, строки в первой колонке часто повторяются. Как объединить эти повторения в одно, так чтобы значения из второй колонки писались через запятую? Помогите пожалуйста.

Абрамов	Мячи, шары
Абрамов	Игрушки, ткани
Абрамов	мячи, куклы

[MuI_I_Ika]

Код Выделить Развернуть

ТекущаяСтрока = Неопределено;
МассивДляУдаления = Новый Массив();

ТЗ.Сортировать("Контрагент");

Для каждого Элемент из ТЗ Цикл

    Если ТекущаяСтрока <> Неопределено и ТекущаяСтрока.Контрагент = Элемент.Контрагент Тогда

        ТекущаяСтрока.Номенклатура = ТекущаяСтрока.Номенклатура + Элемент.Номенклатура;
        МассивДляУдаления.Добавить(Элемент);

    Иначе

        ТекущаяСтрока = Элемент;

    КонецЕсли;

КонецЦикла;

Для каждого УдаляемыйЭлемент из МассивДляУдаления Цикл
    ТЗ.Удалить(УдаляемыйЭлемент);
КонецЦикла;