Разобрался , может кому пригодится решение, все оказалось просто )
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;
Разобрался , может кому пригодится решение, все оказалось просто )
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;