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

Excel и графики   Найти похожие ветки 

← →
twin   (2005-05-28 19:04) [0]

Уважаемые кодеры. Мой вам вопрос: Как программно начертить в Excel график?

Я делал так как указано ниже... но это все не то... Excel чертит две прямые...
Как можно указать в каком месте у меня X, а в каком Y?
Компонент, код? Может быть литература на которую есть ссылка?
Заранее спасибо...

Function  AddChart(var name:variant;ChartType:integer):boolean;
const xl3DArea=-4098;
begin
AddChart:=true;
try
name:=E.Charts.Add.Name;
E.Charts.Item[name].ChartType:=ChartType;
except
AddChart:=false;
end;
End;

// Координаты области данных диаграммы
Function  SetSourceData(Name,Sheet:variant;Range:string;XlRowCol:integer):boolean;
begin
SetSourceData:=true;
try
E.ActiveWorkbook.Charts.Item[name].SetSourceData(Source:=E.ActiveWorkbook.Sheets.Item[Sheet].Range[Range],PlotBy:=XlRowC ol);
except
SetSourceData:=false;
end;
End;

AddChart(ChartName,xl3DColumn);
SetSourceData(1,2,"A1:B1" + inttostr(SG.RowCount),xlColumns);
SetChartType(ChartName,15+51);

---

← →
Cobalt ©   (2005-05-28 19:13) [1]

попробуй обратиться к справке по VisualBasic в Оффисе.

---

← →
twin   (2005-05-28 23:30) [2]

Посмотрел... Как указывать оси не нашел... Точнее нашел как задать sourcedata, но это задаёт лишь Y. Требуется отдельно задать столбец с X.

---

← →
twin   (2005-05-29 16:59) [3]

Мне никто не помог - значит не знаете как... )

---

← →
френк   (2005-05-29 17:48) [4]

Вроде бы так:

Это свойства любого чарта:

NewSeries (новыя ряд)
Series(index).Value  (работа с рядом, указание range для У)
Series(index).XValue (работа с рядом, указание range для Х)

остальное в справке...

---

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

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



Память: 0.45 MB
Время: 0.046 c