OpenOffice.info

Hallo Mike,


versuche doch mal Deinen Postings jeweils eine aussagekräftige Überschrift zu verpassen....

Davon, dass Du "Fragen" oder "Probleme" mit Makros hast ist, ist auszugehen.
Hier in diesem Fall vielleicht "einfügen Dateiinhalt an Cursorposition"


Deine Codezeilen öffnen die angegebene Datei - nichts anderes war zu erwarten.

Du suchst wahrscheinlich [url=http://api.openoffice.org/docs/common/ref/com/sun/star/document/XDocumentInsertable.html#insertDocumentFromURL]insertDocumentFromURL( url, options )[/url]

Hilft das?

Sub Autotext_xxx
Dim oDokument as Object
Dim sUrl as String
Dim Dummy(0) as New com.sun.star.beans.PropertyValue
Dummy(0).Name = "MacroExecutionMode"
Dummy(0).Value = com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN
sUrl = ConvertToUrl ("/net/nfs/space/export/home/xxx/_autotexte/yzd.odt")
oDokument = StarDesktop.loadComponentFromURL( sUrl , "_blank", 0, Dummy() )
End Sub

Hallo,

mit dem nachfolgenden Makro möchte ich Text aus einer anderen Datei in eine geöffnete Date einlesen.

[code]Sub Autotext_xxx
Dim oDokument as Object
Dim sUrl as String
Dim Dummy(0) as New com.sun.star.beans.PropertyValue
Dummy(0).Name = "MacroExecutionMode"
Dummy(0).Value = com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN
sUrl = ConvertToUrl ("/net/nfs/space/export/home/xxx/_autotexte/yzd.odt")
oDokument = StarDesktop.loadComponentFromURL( sUrl , "_blank", 0, Dummy() )
End Sub[/code]

Leider wird immer eine neue Datei mit dem Text geöffnet.
Wodurch muss ich [color=#FF0000]_blank[/color] ersetzen, damit der Text
in die bereits geöffnete Datei geschrieben wird?


mfg
mike