Подскажите пожалуйта! Как создать файл таблицу Excel

← →
Ilya___ (2004-12-27 15:35) [0]

Подскажите пожалуйта! Мне нужно чтобы моя прогрмма
генерировала файл таблицу Excel и в я чейки таблицы
записывала числовые значения. Какие компоненты могут
для этого подойти? У меня Delphi 7 и там есть компоненты
ExcelQueryTable, Excel Application и т.д.
Может они мне помогут. Но справки по ним нет,
Если можно, то напишите простейший пример
создания файла таблицы Excel с записанными в ячейки значениями.
Буду очень благодарен.

← →
Profi © (2004-12-27 15:40) [1]

Ilya___ (27.12.04 15:35)
Используй переменную Value. Создай Excel.Application, а дальше почитай про Бейсик и перенеси его функции на Delphi.

← →
Ilya___ (2004-12-27 15:48) [2]

хотелось бы по подробнее

← →
syte_ser78 © (2004-12-27 15:50) [3]

> [1] Profi © (27.12.04 15:40)
> Ilya___ (27.12.04 15:35)
> Используй переменную Value. Создай Excel.Application, а
> дальше почитай про Бейсик и перенеси его функции на Delphi.

Сам так делаю. Создаю макрос на excel читаю его код и делаю примерно тоже на Delphi

← →
Ilya___ (2004-12-27 15:55) [4]

Но хотелось бы хоть кусочек кода.
если не трудно то перешлите на igpboom@mail.ru
большая просьба!!!

← →
syte_ser78 © (2004-12-27 16:18) [5]

элементарный код для получения имени рабочей книги excel

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,ComObj;

type
TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
excel: variant;
begin
try
excel := GetActiveOleObject( "excel.Application");
except
excel := CreateOLEObject( "excel.Application");
end;
label1.caption:=excel.ActiveWorkbook.name;
end;

end.

← →
Ilya___ (2004-12-27 16:25) [6]

Спасибо! Но мне самое главное нужно
создать файл с таблицей!!!
Как вот это сделать?

← →
syte_ser78 © (2004-12-27 16:26) [7]

Что значит "файл с таблицей"?
При запуске excel создается пустой файл с таблицей

← →
Ilya___ (2004-12-27 16:29) [8]

функция записи результатов в определённые ячейки
определенного файла Excel.
Т.е. в определённые 4 ячейки файла Excel записывается серия из 4
последовательных значений

← →
syte_ser78 © (2004-12-27 16:40) [9]

excel.cells(x,y):="значение";

← →
Ilya___ (2004-12-27 16:44) [10]

Спасибо! Порпробую!

← →
Ilya___ (2004-12-27 16:45) [11]

Спасибо! Попробую!

Ilya___ (27.12.04 16:29) [8]
var excel:variant; begin excel:=createOleObject("Excel.Application"); excel.Workbooks.Add; excel.cells(x,y).value:=0; - если число!
excel.cells(x,y).Text:="Получилось!!! Ура!"; - если текст

> excel.Workbooks.Add;

? Зачем?

> Что бы книгу создать!

она сама по умолчанию создастся.

Подскажите пожалуйта! Как создать файл таблицу Excel Найти похожие ветки