excel2003 vba 画折线图的有关问题
excel2003 vba 画折线图的问题
大家好,在excel2003的开发中遇到了一些问题如下:
在一个sheet页中有一组数据,要根据这组数据在此页调用一个自定义方法画出一个折线图,应该如何做?空白的也成。
我的代码如下:
这段代码中会报类型不匹配的错误。因为定义中的nChart是一个Chart类型的对像,而Charts.Add在API中定义返回的是一个Chart类型的对象,可实际返回的却是object类型。
请大家不吝赐教。谢谢。
------解决方案--------------------
http://download.csdn.net/detail/veron_04/1483925
大家好,在excel2003的开发中遇到了一些问题如下:
在一个sheet页中有一组数据,要根据这组数据在此页调用一个自定义方法画出一个折线图,应该如何做?空白的也成。
我的代码如下:
- VB code
Function createChart() On Error GoTo err Dim nChart As Chart Set nChart = Charts.Add ActiveChart.ChartType = xlLineMarkers Exit Function err: MsgBox Error End Function
这段代码中会报类型不匹配的错误。因为定义中的nChart是一个Chart类型的对像,而Charts.Add在API中定义返回的是一个Chart类型的对象,可实际返回的却是object类型。
请大家不吝赐教。谢谢。
------解决方案--------------------
http://download.csdn.net/detail/veron_04/1483925