Развернуть группировки в таблице с источником динамический список.

&НаКлиенте
Процедура СвернутьДеревоПоиск()
    
    НайденоПоиском = 0;
    
    Состояние("Сворачивание дерева",,, БиблиотекаКартинок.ДлительнаяОперация48);
    
    КоллекцияЭлементов = ДеревоОстатков.ПолучитьЭлементы();
    Для Каждого ЭлементКоллекции Из КоллекцияЭлементов Цикл
        ВлЭлементКоллекции = ЭлементКоллекции.ПолучитьЭлементы();
        Если ВлЭлементКоллекции.Количество() > 0 Тогда
            Сворачивать = Истина;    
            Для Каждого ВлЭл Из ВлЭлементКоллекции Цикл
                СтрКомментарий = ВлЭл.Комментарий;
                Если СтрНайти(СтрКомментарий, СокрЛП(ПоискКоментарий)) > 0 Тогда
                    Сворачивать = Ложь;    
                    ВлЭл.Красим = Истина;
                    НайденоПоиском = НайденоПоиском + 1;
                КонецЕсли;    
            КонецЦикла;
            Если Сворачивать Тогда
                Элементы.ДеревоОстатков.Свернуть(ЭлементКоллекции.ПолучитьИдентификатор());
            Иначе
                Элементы.ДеревоОстатков.Развернуть(ЭлементКоллекции.ПолучитьИдентификатор(), Истина);
            КонецЕсли;    
        КонецЕсли;    
    КонецЦикла;    
    
    ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Найдено = " + ?(НайденоПоиском = 0, "НИЧЕГО", Формат(НайденоПоиском, "ЧЦ=3")));//сообщение пользователю


КонецПроцедуры

Вот тебе, если нужно раскрыть или нет, при открытии
    Элементы.ДеревоОстатков.НачальноеОтображениеДерева = НачальноеОтображениеДерева.РаскрыватьВсеУровни;
    Элементы.ДеревоОстатков.НачальноеОтображениеДерева = НачальноеОтображениеДерева.НеРаскрывать;