Вниз
Скачать: CL | DM;

Передача данных в Excel   Найти похожие ветки 

 
ishicucu ©   (2007-02-26 21:00) [0]

Здравствуйте.
Из моей программы нужно построить таблицу в Excel, я использую COM.
Для форматирования ячеек (расчерчивание линий для печати, выравнивание в ячейке) я использую примерно следующий код:

   for i := 1 to 42 do
     for j := 3 to 27 do begin
       sheet.cells[j,i].HorizontalAlignment:=-4108;
       sheet.cells[j,i].VerticalAlignment:=-4108;
       sheet.cells[j,i].Borders.LineStyle:=1;
     end;

Но программа работает слишком медленно:( На простое форматирование тратится несколько секунд. Возможно, существуют какие-то методы чтобы задать форматирование сразу целому диапазону ячеек?


 
ishicucu ©   (2007-02-26 21:06) [1]

Да, забыл добавить, в переменной sheet лежит указатель на лист.


 
Сергей М. ©   (2007-02-27 08:28) [2]

Sheet.Range[требуемый диапазон ячеек].HorizontalAlignment:= ...


 
SlymRO   (2007-02-27 08:32) [3]

sheet.cells[j,i] - трижды!
надо так
for i := 1 to 42 do
 for j := 3 to 27 do begin
   cell:=sheet.cells[j,i];
   cell.HorizontalAlignment:=-4108;
   cell.VerticalAlignment:=-4108;
   cell.Borders.LineStyle:=1;
 end;

Но быстрее Сергей М. ©   (27.02.07 8:28) [2] всеравно не получится


 
ishicucu ©   (2007-02-27 13:09) [4]

Спасибо, все работает:)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.028 c
15-1171915643
ferr
2007-02-19 23:07
2007.03.18
Клиенты для форума.


1-1169123392
Apachi
2007-01-18 15:29
2007.03.18
разблокировать чужой файл


15-1171993923
TempFile
2007-02-20 20:52
2007.03.18
Кажется, я где то уже это видел...


15-1172334357
Stan
2007-02-24 19:25
2007.03.18
Выравнивание данных


2-1172207214
VitAngel
2007-02-23 08:06
2007.03.18
Сканирование директории




   Наверх