[VBA] Eingebettetes Excel Sheet ansteuern

[migl]

Hallo,
ich habe hier ein Word Dokument, in dem ich per VBA ein eingebettetes Excel Sheet (eingefügtes Objekt) ansteuern will und mit ein paar Werten füllen will, die dann in ein Diagramm umgesetzt werden.
Ich habe jetzt schon ziemlich lange rumprobiert und rumgesucht, aber irgendwie will der Zugriff darauf einfach nicht klappen.
Hat einer von euch eventuell ein funktionierendes Beispiel, wie man das am besten machen kann?
Viele Dank schonmal
Gruß
migl

 

[migl]

So, ich habe es geschafft. Und poste das mal hier als Antwort
Wer dasselbe Prolbem hat sollte es mit diesem Ansatz probieren:

Set OF = ActiveDocument.InlineShapes(1).OLEFormat
OF.Activate
Set xlWkb = OF.Object
xlWkb.WorkSheets("daten").Cells(1, 1).Value = "Hallo Welt"

Weiter Gute Codestücke für Inlineshapes habe ich unter
http://mypage.bluewin.ch/reprobst/WordFAQ/Shapes.htm
gefunden
Gruß