Ваши комментарии

Разобрался , может кому пригодится решение, все оказалось просто )

 

 Var 
       Stpoka:Integer;
   //-------------------//

     Excel.OpenTemplate('D:\Данные.xlsx');          
     Excel.Cell['C'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['D'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['E'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');    

     Excel.Cell['F'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['G'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['H'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['I'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');
     Excel.Cell['J'+ IntToStr( Stpoka )]:= ReadValue('имя канала с которого берем данные');

     Stpoka:= Stpoka + 1;  //при повторном захоже запись происходит в другие ячейки эксель файла
     Excel.Save(' D:\Данные.xlsx'); 
     Excel.Close; 

   




Сервис поддержки клиентов работает на платформе UserEcho