Скачать: CL | DM;

Диаграммы в 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 ... как его получить?

---

← →
Ling ©   (2006-04-25 10:01) [4]

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

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

---

← →
AbrosimovA ©   (2006-04-25 12:22) [5]

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

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c