Вывод в Excel. VPageBreaks

[randrews]

Цитата:

Сообщение от grif

Да, я думал про этот метод, но не нашёл каким методом можно программно создать макрос, т.е. загрузить его в документ Excel при генерации отчёта. Правда навреное не сильно упорно искал

Честно говоря, мне кажется, что этого сделать нельзя.

Не поленился написать код

Name	DataType	Subtype	Length
ws	Automation	'Microsoft Excel 11.0 Object Library'.Worksheet	
wss	Automation	'Microsoft Excel 11.0 Object Library'.Sheets	
wa	Automation	'Microsoft Excel 11.0 Object Library'.Application	
wb	Automation	'Microsoft Excel 11.0 Object Library'.Workbook	
wbs	Automation	'Microsoft Excel 11.0 Object Library'.Workbooks	
wvpbs	Automation	'Microsoft Excel 11.0 Object Library'.VPageBreaks	
wvpb	Automation	'Microsoft Excel 11.0 Object Library'.VPageBreak

 CREATE(wa);
wbs :=  wa.Workbooks;
wb := wbs.Item('Книга1');
wss := wb.Worksheets;
ws := wss.Item('Лист1');
wvpbs := ws.VPageBreaks;
wvpb := wvpbs.Item(1);
//wvpb.Location := ws.Range('F1');
//wvpb.Delete;

Последние две строки закоментированы - делаете либо то либо другое.
Тест такой:
Создаете Книга1, вставляете разрыв. Обязательно переходите в режи "разметка страницы".
Пото пишите код тот что выше - работает. Проверено