Например так:
Описание переменных:
XL - 'Microsoft Excel 10.0 Object Library'.Application
WB - 'Microsoft Excel 10.0 Object Library'.Workbook
WS - 'Microsoft Excel 10.0 Object Library'.Worksheet
RANGE - 'Microsoft Excel 10.0 Object Library'.Range
Код:
CREATE(XL);
WB := XL.ActiveWorkbook;
WS := WB.ActiveSheet;
RANGE := WS.Range('A10');
WS.HPageBreaks.Add(RANGE);
Результат: будет добавлен горизонтальный PageBreak перед 9-ой строкой активного листа Excel
Замечание: в библиотеке 'Microsoft Excel 5.0 Object Library' коллекция HPageBreaks мной обнаружена не была и по этому пришлось использовать библиотеку Microsoft Excel 10.0 Object Library
|