Данный пример вставляет вертикальный разрыв страницы перед столбцом G и затем проверяет количество вертикальных разрывов страниц на листе
var
Sheet: TXLSWorksheet;
begin
Sheet := Workbook.Sheets[1];
Sheet.VPageBreaks.Add(Sheet.Range['G1', 'G1']);
if Sheet.VPageBreaks.Count > 0 then
Sheet.PageSetup.PrintHeadings := True;
end;