Диаграммы в Excell

← →
Ling © (2006-04-24 18:13) [0]

Здравствуйте уважаемые мастера.
Помогите пожалуйста разобраться с диаграммами в excell.
Я без проблемм делал отчёты в Excell и Word, но когда дело дошло до диаграмм, то что-то дело остановилось... нормальной инфы не нашёл.
Принцип такой - нужно создать документ по шаблону, поместить в ячейки свои данные (пока всё просто), и теперь у имеющихся в шаблоне диаграмм необходимо установить диапазоны данных, и вот это у меня не получается.
Charts.count вообще выдаёт 0.
Может у когонибудь есть ссылка на статью, по данному вопросу?

Простейший ример кода:
vals:=VarArrayCreate([0,10,0,0],varInteger); for i:=0 to 10 do begin vals[i,0]:=i*2; end; Excell:=CreateOleObject("Excel.Application"); Excell.Workbooks.Add("E:\Книга2.xlt"); Excell.Range["A5","A15"]:=vals; //тут нужно задать диапазон для имеющейся в шаблоне диакраммы Excell.visible:=true; Excell:= UnAssigned;

← →
так себе (2006-04-24 22:22) [1]

Посмотри http://www.kornjakov.ru/stat.htm

← →
AbrosimovA © (2006-04-25 08:59) [2]

var XRange,YRange: Variant; XRange:=Worksheet1.Range["A5","A15"]; YRange:=Worksheet1.Range["B2","B3"]; Chart1.Chart.SeriesCollection.Add(YRange); Chart1.Chart.Axes(xlCategory).CategoryNames:=XRange;

← →
Ling © (2006-04-25 10:00) [3]

> var XRange,YRange: Variant;
>
> XRange:=Worksheet1.Range["A5","A15"];
> YRange:=Worksheet1.Range["B2","B3"];
> Chart1.Chart.SeriesCollection.Add(YRange);
> Chart1.Chart.Axes(xlCategory).CategoryNames:=XRange;

Chart1 ... как его получить?

> Посмотри http://www.kornjakov.ru/stat.htm

Большое спасибо 8)

Chart1:=Worksheet2.ChartObjects.Add(1, 1, 400, 250);

Диаграммы в Excell Найти похожие ветки