注册 登录
编程论坛 VB6论坛

vb调用并操作Excel的问题,代码不会写,请大家帮帮忙。。

初始元灵 发布于 2016-11-30 19:10, 2223 次点击

利用VB生成了一个Excel文档,里面保存了数据

数据保存在Sheet2中,需要讲Sheet2中的数据拿出来画成一条曲线

曲线放在Sheet1的坐标系里,对这方面的代码从来没了解过,一点都不会,不知道怎么写

能帮我写个模板吗,我想参考一下。

之前的代码是学长写的,感觉vb的代码一到跟Excel有关的地方风格就变了似的。
只有本站会员才能查看附件,请 登录

(Excel在这)
PS:
    Dim appexcel As Excel.Application
    Dim xlBook As Excel.Workbook
    Dim xlSheet As Excel.Worksheet
    Dim chtobj As ChartObject
我看之前这些东西是这样儿定义的,不知道用不用的上。

拜托大家了!!!
3 回复
#2
初始元灵2016-11-30 19:11
拜托版主大神们来帮帮我!!!
#3
ZHRXJR2016-12-01 09:03
VB操作Excel的图表好像比较困难,采用VB的图表控件,调用Excel的数据生成图表还比较简单一点。
#4
xiangyue05102016-12-01 09:31
其实没有这么麻烦的,可以事先做好一个图,利用VB修改图所指向的数据单元格区域。
如果有必要再对数据单元格区域略作调整就可以,比如原来是10行数据,现在只有8行这样的情况
往excel中填入数据,我认为你应该是已经知道如何处理了。
如何修改图的数据源,可以录制宏来实现。下面是一段例子:
ActiveSheet.ChartObjects("图表 1").Activate
ActiveChart.FullSeriesCollection(1).Values = "='HL3'!$D$7:$D$10"
ActiveChart.FullSeriesCollection(2).Name = "='HL3'!$E$7:$E$10"


1