ich möchte auf eine Tabelle, die in einem Draw-Dokument eingefügt wurde (als OLE-Objekt) zugriff erlangen, um sie bearbeiten zu können. mein aktuelles Code-Konstrukt zum öffnen der Datei und Verweis des OLE-Objektes auf oElement sieht folgendermaßen aus:
Die Messagebox gibt dann schon ganz richtig den Typ com.sun.star.drawing.OLE2Shape aus. Wie kann man nun dieses OLE-Objekt zum bearbeiten öffnen, um die Zellinhalte zu verändern?Dim args()
Dim sUrl As String
Dim oDocument As Object
Dim oPage As Object
Dim oOLE As Object
Dim oElement As Object
Dim oTabelle As Object
Dim oDesktop As Object
Dim oTabellenListe As Object
Dim oZelle As Object
sUrl = "file:///home/mbs/Documents/drawtemplate.sxd"
oDesktop = createUnoService("com.sun.star.frame.Desktop")
oDocument = oDesktop.LoadComponentFromUrl(sUrl, "_blank", 0, args())
oPage = oDocument.drawPages(0)
oElement = oPage.getByIndex(0)
MsgBox oElement.getShapeType
Außerdem: mit welchen Anweisungen fügt man einen Text in das Draw-Dokument ein?
Danke schon einmal im Voraus.
MBS