속성 |
메서드 |
var
Sheet: TXLSWorksheet;
BreakItem: TXLSHPageBreak;
begin
Sheet := Workbook.Sheets[1];
BreakItem := Sheet.HPageBreaks.Add(Sheet.Range['A30', 'A30']);
BreakItem.Location.Interior.Color := xlYellow;
if Sheet.HPageBreaks.Count > 1 then
BreakItem.Delete;
end;