Скачать: CL | DM;

Excel.Application.8, его свойства и методы...   Найти похожие ветки 

← →
alfim ©   (2003-07-16 08:28) [0]

Приветствую, пипл...
Собственно, весь вопрос и содержится в сабже...


var
Excel:Variant;
...
Excel:=CreateOleObject("Excel.Application.8");
...

Поскольку Code Insight здесь не спасает :-) - то нужен хелп по полученному объекту. Поиски пока ничего не дали,.. может, здесь кто подскажет?

А если конкретней, то задача такова:
Есть набор данных, по ним надо построить диаграмму Excel"я...
Макросы юзать нельзя, все надо делать со своего приложения...

Заранее благодарен..

---

← →
avch   (2003-07-16 10:32) [1]

Вот тебе ссылки:

http://www.cbuilder.ru/WinLesson/bles1_2.htm
http://www.cbuilder.ru/Stat/elm_dccom/dccom.htm

Обычно работаешь с объектом Excel также как и в макросах,
только скобки надо иногда квадратные....вот пример:
try
Excel := GetActiveOleObject("Excel.Application");
except
Excel := CreateOleObject("Excel.Application");
end;
Excel.Visible := True;
Excel.SheetsInNewWorkbook := 1;
Book := Excel.WorkBooks.Add;
Sheet := Excel.ActiveSheet;
Sheet.Name := "Прогрессия Аn = n2";
Excel.Range("a1") := "N";
Excel.Range("b1") := "n2";
Sheet.Columns.Item[1].ColumnWidth := 3;
Sheet.Columns.Item[2].ColumnWidth := 5;
for I:=1 to 200 do
begin
// в макросах скобки круглые, а сдесь надо квадратные
Excel.Range["a1"].Offset[I,0].Value := IntToStr(I);
Excel.Range["b1"].Offset[I,0].Value := IntToStr(I*I);
end;
// и сдесь
Excel.Range["a2:b201"].Interior.ColorIndex := 4;

---

← →
jack128 ©   (2003-07-16 10:51) [2]

Запускаешь Excel меню Сервис|Макрос|Редактор Visial basic + F1

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c