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 для Х)

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

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