Excel Vba:限制所有图表中数据点的最大数量?

Excel Vba:限制所有图表中数据点的最大数量?,excel,charts,vba,Excel,Charts,Vba,我正在编写代码,以便在ExcelVBA中生成大约7个图表。涉及到许多数据点。我可以生成大约5个图表,直到得到错误运行时错误1004:每个图表的最大数据系列数为255 此错误发生在该行 Set mychart = Activeworkbook.Charts.Add 这很有趣,因为我没有超过3个数据系列的图表。此外,正如我所说,我可以制作任何少于总数的图表组合。 似乎所有图表中使用的总数据点数量都有限制 谢谢。使用类似 Dim rngActive As Range Dim rngSelect As

我正在编写代码,以便在ExcelVBA中生成大约7个图表。涉及到许多数据点。我可以生成大约5个图表,直到得到错误运行时错误1004:每个图表的最大数据系列数为255

此错误发生在该行

Set mychart = Activeworkbook.Charts.Add
这很有趣,因为我没有超过3个数据系列的图表。此外,正如我所说,我可以制作任何少于总数的图表组合。 似乎所有图表中使用的总数据点数量都有限制

谢谢。

使用类似

Dim rngActive As Range
Dim rngSelect As Range

Set rngActive = activecell
set rngSelect = selection

activesheet.cells(1,1).Offset(activesheet.usedrange.rows.count+1).select

' do your chart here

rngSelect.Select
rngActive.Activate

如果您的代码如此简单,那么应该不会有任何问题。您并没有通过这样的方式为其分配任何序列或值,因此没有理由收到此类错误。您确定是该like导致了错误吗?它是在循环中的某个地方还是在With语句中?执行在这一行停止并产生前面提到的错误。它不在循环或with语句中,只是一个独立的行。这很令人困惑。是的,我也很困惑。我运行了同一行100x,但没有产生错误。但是您是否正在使用大型数据集创建图表?请阅读我的第一条评论。那一行之前的代码是什么?