Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.09;
Скачать: CL | DM;

Вниз

excel   Найти похожие ветки 

 
Sash ©   (2004-12-21 06:16) [0]

Здравствуйте!
есть диапазон ячеек c27-i29 и надо построить диаграмму по строкам

Делаю так:  

WB.Sheets[n+1].Range["C27:I29"].Select;
WB.Sheets[n+1].Charts.Add;
//WB.Sheets[n+1].ActiveChart.ChartType:=xlColumnClustered;
WB.Sheets[n+1].ActiveChart.SeriesCollection(1).Name:="jkh";
WB.Sheets[n+1].ActiveChart.SeriesCollection(2).Name:="kjh";
WB.Sheets[n+1].ActiveChart.SeriesCollection(3).Name:="iou";

как дело доходит до второй строчки пишет,
method charts not supported by automation object,
а если раскомментировать 3-ю строчку, то вообще не компилится, пишет
undeclared identifier "xlColumnClustered"

ПЛИЗ! подскажите что делать с этим?
С Уважением
Заранее спасибо! :)


 
SergP ©   (2004-12-21 09:33) [1]


> а если раскомментировать 3-ю строчку, то вообще не компилится,
> пишет
> undeclared identifier "xlColumnClustered"


Что касается xlColumnClustered, то лучше найди его значение и пиши его в проге вместо xlColumnClustered. Либо сделай константу xlColumnClustered.

Кстати только что у себя в Excel2000 глянул. там xlColumnClustered = 51


 
YurikGL ©   (2004-12-21 10:59) [2]

//WB.Sheets[n+1].Charts.Add;

Попробуй ChartObjects


> //WB.Sheets[n+1].ActiveChart.ChartType:=xlColumnClustered;

vr:OleVariant;

vr:=xlColumnClustered;
WB.Sheets[n+1].ActiveChart.ChartType:=vr;


 
YurikGL ©   (2004-12-21 11:01) [3]

Сорри


> WB.Sheets[n+1].Charts.Add;

WB.Charts.Add;

вроде так должно работать


 
Sash ©   (2004-12-21 13:21) [4]

это сработало!!!
WB.Charts.Add;
Спасибо!!! YurikGL ©   (21.12.04 11:01) [3]
только строит диаграмму на другом листе, а мне надо на текущем

2 SergP ©   (21.12.04 09:33) [1]
и Вам спасибо, помогло!

а как узнать значение параметра, к примеру того же xlColumnClustered ???



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

Текущий архив: 2005.01.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
14-1103618002
Чеширский_Кот
2004-12-21 11:33
2005.01.09
Опрос: За что я уважаю Borland?


3-1102482943
self001
2004-12-08 08:15
2005.01.09
выделить цветом поле в dbgrid


8-1096928262
Odem
2004-10-05 02:17
2005.01.09
WMD MIDI Emulator


1-1103526934
liver
2004-12-20 10:15
2005.01.09
ввод в Edit только дробных чисел


14-1103189033
Кот Бегемот
2004-12-16 12:23
2005.01.09
Margaritas ante porcas