Удаление строк из табличной части документа

Если Вопрос("Удалить строки, содержащие альбомы?", "Да+Нет")="Да" Тогда
    тз = СоздатьОбъект("ТаблицаЗначений");
    Док.ВыгрузитьТабличнуюЧасть(тз);
    Для й=1 По ВсегоСтрок Цикл
        тз.УдалитьСтроку(1);
    КонецЦикла;
    Док.ЗагрузитьТабличнуюЧасть(тз);
КонецЕсли;