Редактирование Chart - пропадает инфа.

[novice]

Проблема в автоматическом обновлении Chart в powerpoint.

Dim objChart As Graph.Chart
Dim objPresentation As Powerpoint.Presentation

... ля-ля-ля
Set objChart = objSlide.Shapes.Item(j).OLEFormat.Object
With objChart.Application.DataSheet
' copy rows
For i = 0 To (lngXlsRowEnd - lngXlsRowStart)
' copy cols
For j = 0 To (lngXlsColEnd - lngXlsColStart)
.Cells(lngGraphRowStart + i, lngGraphColStart + j).Value = _
objSrcSheet.Cells(lngXlsRowStart + i, lngXlsColStart + j).Value
Next j
Next i
End With

objPresentation.Save

Отработало, открываем презентацию, видим новый график. Как только кликнем на нем - хоп, и видим уже старый график - вроде мы ничего не меняли. И что бы это было?