Dokument mit Makros öffnen

[felix]

Hallo,

ich habe den folgenden Code aus dem Buch "Makros in OpenOffice.org 2.0"

der Code

Code: Alles auswählen

Sub DokMitMakroOeffnen 'Makros in OO S.211

 Dim vDoc
 Dim Arg(0) as new com.sun.star.beans.PropertyValue
 Dim sURL as String
 sURL = "file:///F:/RWK Auswertung/40 Schuss/Auswertung RWK_40 V1.0.ods"
 Arg(0).name = "MacroExecutionMode"
 Arg(0).Value = 4
 vDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, Arg(1))
 
End sub

den Pfad habe ich entsprechend angepasst.
Allerdings bekomme ich immer folgende Meldung beim Ausführen:
Gleichzeitig ist die Vorletzte Zeile blau hinterlegt.

Code: Alles auswählen

Unzulässiger Wert oder Datentyp.
Index außerhalb des Bereichs.

weiß jemand von euch rat?

MfG Felix

[ykcim]

Hallo,

der Fehler liegt im Paramter arg(1). Die Parameterübergabe eines Arrays erfolgt mit arg()

Code: Alles auswählen

 vDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, Arg())

mfg
Michael

[felix]

Hallo

Super danke funktioniert.

MfG Felix