![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Delphi + Excel [D6]
bobr12 © (2002-09-06 10:59:00)Хочу чтобы при выполнении программы создавался график в 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". Кто-нибудь знает как определить внешний вид диаграммы - мне нужно представить ее в виде графика? И еще кто-нибудь знает где взять информацию по этой теме? Интересует, например, как менять цвет линий диаграммы и др.
Рыжик (2002-09-06 12:34:00) [1]Люди, пишушие книжки, тоже иногда ошибаются. И уж точно не все проверяют свои примеры. Смотри справку по VBA.
Доверяй, но проверяй
bobr12 (2002-09-06 12:28:00) [2]Из книжки взял пример.
Рыжик (2002-09-06 12:25:00) [3]А откуда собственно у Worksheet взялось св-во Chart? Есть ChartObjects, а вот Chart нету...
bobr12 (2002-09-06 12:18:00) [4]To: Карелину Артему
Если можно дай ссылку - где Delphikingdom.com это обсуждение. А то что ты посоветовал - работает.
Карелин Артем (2002-09-06 12:03:00) [5]Вообще-то надо сначала создать 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;
Вот такие тараканы...
AFrolov (2002-09-06 11:08:00) [6]1. Справка по VBA - входит в состав офиса
2. Запись макросов в Excel позволяет получить готовый пример кода делающего то, что было проделано в excel.
3. http://www.afalinasoft.com/rus/tips/index.html- может будет полезно.