Delphi + Excel

← →
bobr12 (2002-09-06 10:59) [0]

Хочу чтобы при выполнении программы создавался график в Excel. Пишу следующее.
App := CreateOleObject("Excel.Application");
App.Visible:=true;
App.Workbooks.Add(1);

App.Workbooks[1].Sheets.Add(,,2,xlWBATChart);
//App.WorkBooks[1].Sheets[1].Chart:=xl3dColumn{xl3DPie};
Rng:=App.WorkBooks[1].WorkSheets[1].Range["B1:B5"];
App.WorkBooks[1].Sheets[1].SeriesCollection.Add(Rng);
Проблема с закомментированной строкой. Взял ее из книжки - она должна определять внешний вид диаграммы. Однако выдает ошибку -
"Method "Chart" not supported by automation object". Кто-нибудь знает как определить внешний вид диаграммы - мне нужно представить ее в виде графика? И еще кто-нибудь знает где взять информацию по этой теме? Интересует, например, как менять цвет линий диаграммы и др.

← →
AFrolov © (2002-09-06 11:08) [1]

1. Справка по VBA - входит в состав офиса
2. Запись макросов в Excel позволяет получить готовый пример кода делающего то, что было проделано в excel.
3. http://www.afalinasoft.com/rus/tips/index.html - может будет полезно.

← →
Карелин Артем © (2002-09-06 12:03) [2]

Вообще-то надо сначала создать Chart, потом уже использовать. Я уже давал ответ на этот вопрос. Посмотри на Delphikingdom.com Будут вопросы-почтой плиз.
///
var Chart:variant;
///
Chart:=App.Workbooks[1].Sheets.Add(,,2,xlWBATChart);//по-моему друга константа.
App.WorkBooks[1].Sheets[1].Chart:=xl3dColumn{xl3DPie};//Тут видимо надо Chart.type:=xl3dColumn;

Вот такие тараканы...

← →
bobr12 (2002-09-06 12:18) [3]

To: Карелину Артему
Если можно дай ссылку - где Delphikingdom.com это обсуждение. А то что ты посоветовал - работает.

← →
Рыжик © (2002-09-06 12:25) [4]

А откуда собственно у Worksheet взялось св-во Chart? Есть ChartObjects, а вот Chart нету...

← →
bobr12 (2002-09-06 12:28) [5]

Из книжки взял пример.

Люди, пишушие книжки, тоже иногда ошибаются. И уж точно не все проверяют свои примеры. Смотри справку по VBA.
Доверяй, но проверяй

Delphi + Excel Найти похожие ветки