Makros beim Laden von Dokumenten aktivieren

[nimix13]

Hallo,
ich habe folgendes Problem:
Wenn ich ein Dokument per Makro Lade sind die Makros aus diesem geladenen Dokument deaktiviert, obwohl ich den Ordner in dem sich das Dokument befindet als sicheren Bereich angegeben habe.
Gibt es eine Möglichkeit Dokumente aus Makros heraus so zu laden, dass die darin enthaltenen Makros aktiviert sind?

[Stephan]

Du mußt das beim Laden als Parameter übergeben, z.B.:

Code: Alles auswählen

Sub DokumentOeffnen
Dim oDokument as Object
Dim sUrl as String
Dim Dummy(0) as New com.sun.star.beans.PropertyValue
Dummy(0).Name = "MacroExecutionMode"
'Konstanten:
'NEVER_EXECUTE
'FROM_LIST
'ALWAYS_EXECUTE 
'USE_CONFIG
'ALWAYS_EXECUTE_NO_WARN
Dummy(0).Value = com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN
sUrl = ConvertToUrl ("D:\fff.sxw")
dokument = StarDesktop.loadComponentFromURL( sUrl , "_blank", 0, Dummy() )
End Sub

Gruß
Stephan