Eingebettetes Diagramm

[stbuerk]

Hallo,
ich will ein Diagrammm aus einem Calc-Dokument in ein Writer-Dokument einbetten.

So weit bin ich schon

Code: Alles auswählen

sub ganzanders (oDokument)
const msChartClassID = "12dcae26-281f-416f-a234-c3086127382e"
obj = oDokument.createInstance("com.sun.star.text.TextEmbeddedObject")
obj.CLSID = msChartClassID 	
Dim oVC : oVC = oDokument.getCurrentController().getViewCursor()
obj.attach( oVC)
end sub

Dieser Code erzeugt im Writerdokument, das als Argument übergeben wurde ein Diagramm mit irgedwelchen Beispielzahlen. Wie aber erstelle ich nun eine Verbindung zu meinem Kalkulationsblatt, damit meine Daten in dem Diagramm dargestellt werden?