With Workbook.Sheets[1] do begin HPageBreaks.Add(Range['G15', 'G15']); VPageBreaks.Add(Range['G15', 'G15']); end;