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