TGridToXLS

Workbook.Sheets[

for Workbook.Sheets[ ].UsedRange.Select;

Workbook.Sheets[

This example sets the font style for every second row in the used range to bold With Workbook.Sheets[;

for

i :=

Workbook.Sheets[1].UsedRange.Select;
(i mod

Workbook.Sheets[1].UsedRange.Font.Italic := True;
then

With Workbook.Sheets[1].UsedRange do begin
  for i := 1 to Rows.Count do
    if (i mod 2) = 0 then Rows[i].Font.Bold := True;
end;