Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Вниз

Выгрузка данных в 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 := "";




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.03 c
14-308            UGH|B1ADE             2002-02-17 20:42  2002.04.01  
Хелп плиззз !SOS!


1-107             kolobok               2002-03-21 12:33  2002.04.01  
Проблема с встроенным в TStringGrid чекбоксом !


1-119             Aleksandr             2002-03-21 14:49  2002.04.01  
Как защитить переменные в потоке?


6-265             Malder                2002-01-19 13:39  2002.04.01  
Перехват Socket соединения


1-127             SPeller               2002-03-21 13:28  2002.04.01  
Ненужные ресурсы