Показать сообщение отдельно
Старый 26.10.2006, 14:58   #4  
randrews is offline
randrews
Участник
Аватар для randrews
 
312 / 10 (1) +
Регистрация: 06.12.2004
Цитата:
Сообщение от 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, вставляете разрыв. Обязательно переходите в режи "разметка страницы".
Пото пишите код тот что выше - работает. Проверено