在PowerPoint中修改树形图

Question

我有一个图表，可以通过更改Excel工作簿中的值来使用VBA进行修改。一切正常，但是我想在突然停止运行代码的地方使用treemap-chart。

该代码可与PowerPoint中的其他图表完美配合，但是当我将其更改为TreeMap时，该代码将停止执​​行，并且图表不会更改其值。

Option Explicit

Sub Chart_TT()

 With ActivePresentation.Slides(2).Shapes("Chart 1").Chart.ChartData
    .Activate
    .Workbook.Sheets(2).Range("C2").Value = .Workbook.Sheets(2).Range("I9").Value
    .Workbook.Sheets(2).Range("D2").Value = .Workbook.Sheets(2).Range("J9").Value
    .Workbook.Sheets(2).Range("E2").Value = .Workbook.Sheets(2).Range("K9").Value
    .Workbook.Sheets(2).Range("F2").Value = .Workbook.Sheets(2).Range("L9").Value
    .Workbook.Close SaveChanges:=True
 End With

End Sub

显示的错误代码是：

  

“错误-2147467259（80004005）：对象” ChartData“的方法” workbook“失败。

该代码也可以与TreeMap图表一起使用，我该怎么做？

谢谢！

Answer 1

对不起，树形图图表样式还很新，并且尚未包含在VBA对象模型中。