var Summary: IXLSWorksheet; begin Summary := Workbook.Worksheets.Add; Summary.Name := 'Summary'; Summary.Range['A1', 'A1'].Value := 'Monthly summary'; Summary.Activate; Workbook.SaveAs('C:\Reports\summary.xls'); end;