PowerPoint Chart Assigning Data

Hello,

I have a problem with updating data in a PowerPoint chart. (Im sorry for my English, its not very good)

Code is this:

ActivePresentation.Slides(1).Shapes(1).Chart.SeriesCollection(1).Values = Array(1, 2, 3)
ActivePresentation.Slides(1).Shapes(1).Chart.Refresh

But the chart doesnt want to update without calling 

ActivePresentation.Slides(1).Shapes(1).Chart.ChartData.Activate

I dont need Excel to assigning data in the chart and I dont want Excel window to be shown. Does anyone know how to update the chart without Excel?

Thanks for all your answers,

Ludmila