0
Отвечен

Писанец Александр

zim 2 года назад в Общие вопросы обновлен СИМП Лайт (тех.поддержка) 1 год назад 3

Здравствуйте. Подскажите как записать а EXSEL подряд много данных, что я делаю не так ?

Excel.OpenTemplate( Temp);

Excel.Cell['A1']:='кккк';

 Excel.Cell['Â1']:='нннн';

 Excel.Save(Temp);     
   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; 

   


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