delphi如何控制excel中的图表(chart)? (50分)

  • 主题发起人 主题发起人 eastweast
  • 开始时间 开始时间
E

eastweast

Unregistered / Unconfirmed
GUEST, unregistred user!
用delphi控制excel我已经很熟悉了,如何用delphi控制excel中的chart。
我用下列语句出错。
。。。。。。
。。。。。。
ExcelChart1.connectto(Excelworksheet1.chartobjects('图表1') as _chart);
ExcelChart1.activate;
......
运行到上面一句时出错,请问正确的语句该怎样写?
 
沒人知道嗎?
關注者有分,up者有分.
 
跟我提的问题差不多,希望高手能指点
 
用xlreport组件控制excel
http://www.playicq.com/下载,有例子
 
到http://www.tommstudio.com/newclub30/ 看看有没有这方面的资料。
 
在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheet
var asheet1,achart, range:variant;

1)选择当第一个工作薄第一个工作表
asheet1:=ExcelApplication1.Workbooks[1].Worksheets[1];

2)增加一个二维图
achart:=asheet1.chartobjects.add(100,100,200,200);

3)选择二维图的形态
achart.chart.charttype:=4;

4)给二维图赋值
series:=achart.chart.seriescollection;
range:=sheet1!r2c3:r3c9;
series.add(range,true);

5)加上二维图的标题
achart.Chart.HasTitle:=True;
achart.Chart.ChartTitle.Characters.Text:=’ Excle二维图’
 
多人接受答案了。
 
owangqiang的方法只是添加一个Chart对象,然后操作它!
不知道能不能再赐教如何操作一个已经存在的Chart呢?
比如说某个Sheet中有两个Chart,如何让第一个Chart成为活动的??……赐教!!
 
后退
顶部