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

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

← →
7th_Angel   (2004-04-19 12:12) [0]

Здрассте!
Есть такая проблема: нужно открыть Excel, создать новую книгу, заполнить
лист данными, по которым затем строится диаграмма.
Так вот, получается все кроме последнего, а именно - делаю так:

var ch:variant;
...
ch:=app.Workbooks[1].Worksheets[1];
ch.ChartObjects.add(10,50,400,400);
ch.chartwizard(ch.Range["A1:B2"], xl3DColumn);

На последней строчке возникает исключение, вызванное тем, что метод chartwizard не поддерживается automation object-ом
Может я что-нибуть не правильно делаю, или есть другой способ создания диаграммы?

---

← →
Думкин ©   (2004-04-23 08:58) [1]

Add Method (ChartObjects Collection) Example

This example creates a new embedded chart.

Set co = Sheets("Sheet1").ChartObjects.Add(50, 40, 200, 100)
co.Chart.ChartWizard Source:=Worksheets("Sheet1").Range("A1:B2"), _
   Gallery:=xlColumn, Format:=6, PlotBy:=xlColumns, _
   CategoryLabels:=1, SeriesLabels:=0, HasLegend:=1

---

← →
Slick   (2004-04-23 12:05) [2]

exOLE: Variant;

exOLE :=CreateOleObject("Excel.Application");
exOLE.WorkBooks.Add(xlWBATworksheet); // Add workbook
// Данные
…
// Диаграмма
exOLE.Charts.Add;  // Add diagramm
exOLE.ActiveChart.ChartType := xl3DPie;  // Type diagramm
exOLE.ActiveChart.SetSourceData(R.range[A1:B?], xlColumns);

Константы Excel в Excel2000.pas (..\Ocx\Servers)

---

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

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



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