Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.01.09;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.037 c
1-1103609939
DDDeN
2004-12-21 09:18
2005.01.09
Перезаписать используемый другой прогой файл


4-1100934519
Avatara
2004-11-20 10:08
2005.01.09
Запуск посторонних приложений


1-1103554456
Cosinus
2004-12-20 17:54
2005.01.09
Как узнать координаты определенной строки в ListBox-е?


3-1102580853
REA
2004-12-09 11:27
2005.01.09
Алиасы в Firebird


1-1103545315
tradakad
2004-12-20 15:21
2005.01.09
показать имя PopupMemu итема





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский