2016-11-17 77 views
0

我已經在Stackoverflow和其他站點上看到了一些示例,可以使用數組設置圖表的值,但這不適用於我:將一個數組設置爲Chart.SeriesCollection()。值

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

當我檢查.Chart.SeriesCollection(3).Values,值20沒有設置,它說,沒有變數。爲什麼這不適合我? PS:我已經在我的PPT中有一個圖表,在這裏我只是改變了價值。我可以通過調用電子表格來更改,但我想直接更改。

回答

1

這在理論上應該工作。但是,我在您的代碼中看到了SeriesCollection(1),在文本中看到了SeriesCollection(3)。 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

所以,你這是從Excel中嵌入的圖表。要編輯它,你需要Excel。另一種方法是在PowerPoint中創建一個圖表,因此您不需要Excel。

+0

嗨z32a7ul!關於SeriesCollection(3)我剛纔在文中寫錯了。這很奇怪。當我檢查變量,它表明我已經有值,但是當我設置陣列(..),並再次檢查變量,沒有什麼,它說,沒有變數。你認爲這是因爲我正在使用PPT中的已經完成的圖表嗎? – Braulio

+0

嗨!我嘗試過,並沒有工作。結果是一樣的:/ – Braulio

+0

什麼你在監視窗口下ActiveChart.SeriesCollection(1).Values和ActiveChart.SeriesCollection(1).Formula和ActiveChart.SeriesCollection(1).FormulaLocal看到了什麼? – z32a7ul