Писанец Александр
Здравствуйте. Подскажите как записать а EXSEL подряд много данных, что я делаю не так ?
Excel.OpenTemplate( Temp);
Excel.Cell['A1']:='кккк';
Excel.Cell['Â1']:='нннн';
Excel.Save(Temp);
Excel.Close;
Ответы 3
День добрый.
Уточните задачу, и какие сложности у Вас возникли при её реализации.
День добрый.
Уточните задачу, и какие сложности у Вас возникли при её реализации.
Разобрался , может кому пригодится решение, все оказалось просто )
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;