Добрый день, подскажите пожалуйста, как вывести область на отдельных листах, т.е. в альбомном виде на один лист, количество листов должно быть равно Выборка.ВсегоПаллет:

ТабДокумент    = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("Макет");
   ОбластьПаспорт = Макет.ПолучитьОбласть("Паспорт");  
   
   
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ...
...;
Запрос.УстановитьПараметр("Ссылка",ДокументПланированиеОтгрузки.Ссылка);          
Выборка = Запрос.Выполнить().Выбрать();
       
   Пока Выборка.Следующий() Цикл

Если (Выборка.НомерПаллета<=Выборка.ВсегоПаллет) Тогда
ОбластьПаспорт.Параметры.СведенияОПоставщике = Выборка.Организация;  
ОбластьПаспорт.Параметры.НомерПал = "№ "+Выборка.НомерПаллета + " из " + Выборка.ВсегоПаллет;
ОбластьПаспорт.Параметры.КоличествоКор = Выборка.КоличествоКоробов;
ОбластьПаспорт.Параметры.ТипИАдрес = Выборка.Контрагент;
ОбластьПаспорт.Параметры.Заявка = Выборка.НомерЗаявки;
ТабДокумент.Вывести(ОбластьПаспорт);
КонецЕсли;
           
   КонецЦикла;
       
ТабДокумент.АвтоМасштаб             = Истина;
ТабДокумент.ОриентацияСтраницы      = ОриентацияСтраницы.Портрет;
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
ТабДокумент.Показать();

извините, сама сделала)))))))))