将数组设置为Chart.SeriesCollection（）

我已经看到一些例子在这里在Stackoverflow和其他网站的方式来设置图表的值使用数组，但是这不适合我：

d_ppt_output.Slides(1).Shapes("P_Cronograma_Realizado").Chart.SeriesCollection(1).Values = Array(20) 

当我检查.Chart.SeriesCollection（3）.Values，值20没有设置，它说没有variables。 为什么这不适合我？ PS：我已经在我的PPT中有一个图表，在这里我只是在改变价值。 我可以通过调用电子表格来更改，但是我想直接更改。

Answer 1

这应该在理论上起作用。 但是，我在您的代码和SeriesCollection（3）文本中看到SeriesCollection（1）。 Array（）必须包含您计划在图表上呈现的所有值，所以如果您只想看到一个20，那么就没关系。

更新1

你可以试试以下吗？

 Dim varValues(1 To 1) as Variant varValues(1) = 20 d_ppt_output.Slides(1).Shapes("P_Cronograma_Realizado").Chart.SeriesCollection(1).Values = varValues 

更新2

所以，你有一个从Excelembedded的图表。 要编辑它，你需要Excel。 另一种方法是在PowerPoint中创build一个图表，所以你不需要Excel。