// ТПОтчета - Табличное поле

//СписОтбора - Полученый список значений выделенных ячеек, текущей колонки



СписОтбора=Новый СписокЗначений;

ТекКолонка = ЭлементыФормы.ТПОтчета.ТекущаяКолонка.Данные;

Для Каждого стр из ЭлементыФормы.ТПОтчета.ВыделенныеСтроки Цикл

	СписОтбора.Добавить(стр[ТекКолонка]);

КонецЦикла;   

 Процедура УдалитьПустыеКолонкиТЗ(ТЗ)

    МассивВозможноПустыхКолонок=Новый Массив;

    Для Каждого ТекКолонка Из ТЗ.Колонки Цикл

        МассивВозможноПустыхКолонок.Добавить(ТекКолонка.Имя);

    КонецЦикла;

    Для Каждого СтрТЗ из ТЗ Цикл

        КолВоВозможноПустыхКолонок=МассивВозможноПустыхКолонок.Количество();

        Для К=1 по КолВоВозможноПустыхКолонок Цикл

            Если ЗначениеЗаполнено(СтрТЗ[МассивВозможноПустыхКолонок[КолВоВозможноПустыхКолонок-К]]) Тогда

                МассивВозможноПустыхКолонок.Удалить(КолВоВозможноПустыхКолонок-К);

            КонецЕсли;

        КонецЦикла;

    КонецЦикла;

    КолВоВозможноПустыхКолонок=МассивВозможноПустыхКолонок.Количество();

    Для К=0 по КолВоВозможноПустыхКолонок-1 Цикл

        ТЗ.Колонки.Удалить(МассивВозможноПустыхКолонок[К]);

    КонецЦикла;

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