VBA Chart automation using ActivateChartDataWindow

[Diannaheart]

I'm building a chart automation script in powerpoint and i have any issue when calling upon "ActivateChartDataWindow".


I would use "Activate" instead of "ActivateChartDataWindow", but "Activate" loads the full Excel program and makes the whole routine run slow and ulgy.


The problem I have is that "ActivateChartDataWindow" does work to populate the charts, but when I manually go to edit the data - right click, edit data - to access the excel application, it does not seem to want to load!


It has been driving my crazy for the last 5 hours and would appreciate any ideas on how to over come this.


OLE.dlll are working correctly and the code I am using is given below.

also the charts are non ole !




Code below:


There are 5 slides with one chart on each page and the code below is what i am using as a point of concept


I have a feeling i am using "ActivateChartDataWindow" wrong, but there is not much on the web to know what i am doing wrong! Arrrhhhh!


For i = 1 To 5
Set instance = Nothing
Set instance = ActivePresentation.Slides(i).Shapes(1).Chart.ChartData
With instance
.ActivateChartDataWindow
instance.Workbook.Sheets(1).Range("A1:H26").Value = 27
instance.Workbook.Close
End With
Next i
End Sub