Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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- может будет полезно.


Наверх

Титульная страница Поиск, карта сайта Написать письмо