Добрый день.

Возник вот такой вопрос, на который хотелось бы получить подробный ответ
На форме есть 2 ActiveX объекта: Microsoft Office PivotTable 10.0 и Microsoft Office Chart 10.0. Как мне связать 2 этих компонента что бы при изменении данных в таблице изменялся график. Подскажите на конкретном примере кода пожалуйста. Заранее благодарен

 

Все оказалось намного проще чем я думал. Вот что у меня получилось:

Sub Postopen(Source As Notesuidocument)
Source.EditMode = True
Set Obj = Source.GetObject ("OC")
Obj.Clear
Set Obj2=Source.GetObject ("PT")
Set Obj.DataSource = Source.GetObject("PT")
Obj.DisplayFieldButtons=False
Obj.HasChartSpaceLegend = True
End Sub