Выгрузка данных в Excel

← →
DiggerAbstract (2002-03-09 09:51) [0]

У меня такой вопрос(немного не по БД) - имеется шаблон с шапкой отчета в *.xls формате, как мне привыгрузке данных сделать так, чтобы на каждой странице отчета была эта шапка

← →
JibSkeart © (2002-03-09 11:36) [1]

Var
Xl,Xarr:Variant;
begin
XArr:=VarArrayCreate([1,2],varVariant);
XL:=CreateOLEObject("Excel.Application");
XL.WorkBooks.add;
XL.visible:=true;
XArr[1]:="hello";
XArr[2]:="world";
XL.Range["A"+IntToStr(j),"B"+IntToStr(j)].Value := XArr;
end;

Так Пойдет ??

← →
DiggerAbstract (2002-03-09 12:38) [2]

Спасибо за ответ, но я уже нашел, для тех кому интересно вот строчки кода:
Ex.ActiveSheet.PageSetup.PrintTitleRows := "$1:$5"{строки которые нужно повторять на каждой странице}; Ex.ActiveSheet.PageSetup.PrintTitleColumns := "";

Выгрузка данных в Excel Найти похожие ветки