首页 > 解决方案 > 如何确定 Excel 图表是否有任何数据系列

问题描述

我正在尝试使用 VBA 创建一个带有以下行的图表:

Set StressChart = INFsheet.Shapes.AddChart2(240, xlXYScatterLines)

有时图表已经带有一个(无意义的)数据点,我必须删除它:

StressChart.Chart.FullSeriesCollection(1).Delete

但是,有时还没有数据,FullSeriesCollection 对象也不存在。这会导致错误。

我如何预测是否会有数据,或者我如何测试是否有数据?

我的本地树如下所示: 在此处输入图像描述

快照是在以下断点处进行的: 在此处输入图像描述

如上所示,代码运行良好,但如果取消注释第二条绿线(标记为“已禁用调试”),我会收到以下错误:“参数无效”。

标签: excelvbaexcel-charts

解决方案


请试试:

If `StressChart.Chart.FullSeriesCollection.count > 0 Then StressChart.Chart.FullSeriesCollection(1).Delete`

编辑: 在您的代码中使用上述建议:

If `.Chart.FullSeriesCollection.count > 0 Then .Chart.FullSeriesCollection(1).Delete`

它会出现同样的错误吗?


推荐阅读