Передача данных в 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] всеравно не получится

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

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