Как вообще генерировать фалы Excel в Delphi? По какому слову искать в хелпе? Что об этом можно почитать в Сети?
P.S. Понимаю что вопрос ламерский, но ума не приложу, с какой стороны к нему подойти.
Экспорт в Excel
Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду
Можно посмотреть модуль ExcelXP,
а если проще - CreateOleObject('Excel.Application');
а если проще - CreateOleObject('Excel.Application');
С уважением, Lost Angel...
Можно еще проще. Если это просто текстовая таблица.
Выводишь данные в текстовый файл с разделителями табуляции и ставишь ему расширение xls.
Ексель сам разобъет :-)
Выводишь данные в текстовый файл с разделителями табуляции и ставишь ему расширение xls.
Ексель сам разобъет :-)
-
- Сообщения: 407
- Зарегистрирован: 13 сен 2004, 12:05
- Откуда: Курган
- Контактная информация:
Хошь код брошу???
Не бейте сильно, т.к. списывал с коленки у соседки!Но тут пример открытия уже готового документа. А если надо создать... гм... у нее не было написано...

Код: Выделить всё
Uses ...., comobj;
.....
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
DocExcel:Variant;
implementation
{$R *.dfm}
......
procedure TForm1.Button1Click(Sender: TObject);
begin
DocExcel:=CreateOleObject('Excel.Application');
DocExcel.Workbooks.Open('C:\Книга1.xls');
If vartype(DocExcel)=varDispatch then
DocExcel.visible:=true;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
If vartype(DocExcel)=varDispatch then
begin
DocExcel.Displayalerts:=false;
DocExcel.Quit;
DocExcel:=Unassigned;
end;
end;

- Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
После "DocExcel." можно писать все, что найдется в справке по VBA в MSOffice.
Для создания: DocExcel.Workbooks.Add;
Для записи в ячейки: DocExcel.ActiveWorkbook.Cells[r,c]:="qwe";
Для сохранения: DocExcel.Workbooks.Save; {тут можно и параметры задать}
PS
Есть еще соедний форум по VBA, так что сильно тут не увлекайтесь.
Для создания: DocExcel.Workbooks.Add;
Для записи в ячейки: DocExcel.ActiveWorkbook.Cells[r,c]:="qwe";
Для сохранения: DocExcel.Workbooks.Save; {тут можно и параметры задать}
PS
Есть еще соедний форум по VBA, так что сильно тут не увлекайтесь.
Большое спасибо всем. Щас буду пробовать.