Var Workbook: IXLSWorkbook; begin Workbook := TXLSWorkbook.Create; Workbook.Open('book.xls'); DataToXLS1.Worksheet := Workbook.Sheets.Add; end;