OpenOffice.info

With Arg(0)
	.Name = "MacroExecutionMode"
	.Value = com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN
End With

[quote]Was wird mit "LoadComponentFromURL-Methode" gemeint?[/quote]

die gleichnamige Methode:
http://api.openoffice.org/docs/common/ref/com/sun/star/frame/XComponentLoader.html#loadComponentFromURL

[quote]Vor allem sind vorne ja zwei Punkte, da muss ja sicher was bestimmtes davor stehen?[/quote]

die entsprechende Variable des Parameterarrays, meinethalben:
http://de.openoffice.info/viewtopic.php?t=3023

oder schreibe es halt mit With:

[code]With Arg(0)
.Name = "MacroExecutionMode"
.Value = com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN
End With[/code]


[i](Ob das alles Dein Poblem löst weiß ich hingegen nicht, meine Frage beantwortest Du nicht zu meiner Vermutung antwortest Du mit 2 Gegenfragen, so das ich nicht weiß wo das Problem konkret liegt, mutmaßlich jedoch nicht da wo ich es annahm, also im Laden der DAtei mittels Makro und späterem Ausführen von makros aus der geladenen Datei.)[/i]



Gruß
Stephan

.Name = "MacroExecutionMode" 
.Value = "com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN [/[uote]

Achso, trotzdem Danke mal.

Wo füge ich dann den folgenden Code ein?

[code].Name = "MacroExecutionMode"
.Value = "com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN [/[uote][/code]

Vor allem sind vorne ja zwei Punkte, da muss ja sicher was bestimmtes davor stehen?

Grüße! :)

Hi,

ich habe mich heute Morgen auf die Schnelle dazu hinreissen lassen Dir obigen Code zu posten.
Dieser Code ist aber nur dann einzusetzen, wenn man aus einem Makro ein anderes Dokument mit Makroinhalt aufruft.

[quote="red2sign"]Was wird mit "LoadComponentFromURL-Methode" gemeint?
Einen solchen habe ich nicht... ??? :([/quote]

Eben drumm.

Jürgen

Hi Jürgen,

deinen Code dann also in mein Startmakro zusätzlich eintragen?

Thx :)

Dim mArgs(3) as New com.sun.star.beans.PropertyValue
	mArgs(0).Name = "ReadOnly"
	mArgs(0).Value = False
	mArgs(1).Name = "MacroExecutionMode"
	mArgs(1).Value = 4
	mArgs(2).Name = "AsTemplate"
	mArgs(2).Value = false
	mArgs(3).Name = "Wait"
	mArgs(3).Value = true
	oDocument = ThisComponent.getCurrentController.GetFrame.loadComponentFromURL(sURL,"_blank",0, mArgs())

Hallo,

[quote="red2sign"].Name = "MacroExecutionMode"
.Value = "com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN [/quote]
hat damals bei mir auch nicht funktioniert.

In meiner Extension "LastSession" habe ich das dann wie folgt gelöst:
[code]Dim mArgs(3) as New com.sun.star.beans.PropertyValue
mArgs(0).Name = "ReadOnly"
mArgs(0).Value = False
mArgs(1).Name = "MacroExecutionMode"
mArgs(1).Value = 4
mArgs(2).Name = "AsTemplate"
mArgs(2).Value = false
mArgs(3).Name = "Wait"
mArgs(3).Value = true
oDocument = ThisComponent.getCurrentController.GetFrame.loadComponentFromURL(sURL,"_blank",0, mArgs())[/code]

Viel Erfolg.

Jürgen

Hi!

[quote]Du mußt bei der LoadComponentFromURL-Methode einen der Parameter:
[url]http://api.openoffice.org/docs/common/ref/com/sun/star/document/MacroExecMode.html[/url]

übergeben.
Also meinethalben:

.Name = "MacroExecutionMode"
.Value = "com.sun.star.document.MacroExecMode.ALWAYS_EXECUTE_NO_WARN [/[uote][/quote]

Was wird mit "LoadComponentFromURL-Methode" gemeint?
Einen solchen habe ich nicht... ??? :(

Es scheint mir ein anderes Problem zu sein, denn wenn ich in der Vorlagedatei das Startmakro manuell anstarte (durch eine Symbolverknüpfung), erscheint der Dialog auch nicht.

Muss man Dialoge in Vorlagen anders ansprechen / anders erzeugen?

:?

Hi red2sign,

folgendes funktioniert bei mir:

Das Makro auf "Dokument erzeugen" gelegt.

Dann das *.ott Dokument als Vorlage abgelegt.
Aufruf über Menue > Datei > Neu > Vorlagen und Dokumente > Dialog öffnet sich. :lol:

Oder aber das *.ott Dokument als Standardvorlage definiert > Dialog öffnet sich beim Starten von Writer. :lol:


Jürgen

Hi

Habs mal ausprobiert, aber ohne Effekt...

Wie regelt ihr das bei euch?

 
Public MyDlg as Object
Sub CallDialog
  
  DialogLibraries.LoadLibrary( "Standard" )
  MyDlg = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
  MyDlg.Model.Step=1  
  MyDlg.Execute()
  MyDlg.Dispose()

End Sub

Guten Morgen

Ich habe eine writer-Datei, in der das Makro "CallDialog" beim starten den Dialog aufruft.
Wenn ich die Datei aber als Vorlage speichere, muss ich den Dialog manuell starten.
Ist das normal?

[code]
Public MyDlg as Object
Sub CallDialog

DialogLibraries.LoadLibrary( "Standard" )
MyDlg = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
MyDlg.Model.Step=1
MyDlg.Execute()
MyDlg.Dispose()

End Sub[/code]