excel2003 vba 画折线图的有关问题

excel2003 vba 画折线图的问题
大家好，在excel2003的开发中遇到了一些问题如下：
 在一个sheet页中有一组数据，要根据这组数据在此页调用一个自定义方法画出一个折线图，应该如何做？空白的也成。
 我的代码如下：

VB code

Function createChart()On Error GoTo err   Dim nChart As Chart    Set nChart = Charts.Add    ActiveChart.ChartType = xlLineMarkers        Exit Functionerr:   MsgBox ErrorEnd Function

这段代码中会报类型不匹配的错误。因为定义中的nChart是一个Chart类型的对像，而Charts.Add在API中定义返回的是一个Chart类型的对象，可实际返回的却是object类型。

请大家不吝赐教。谢谢。

[解决办法]
http://download.csdn.net/detail/veron_04/1483925

查看更多 下一篇