Makro Recorder fehlt

[Schwedenbitter]

Hallo,

ich benutze aktuell Version 25.2.5.2 von LibreOffice. Es aktualisiert sich inzwischen komplett allein.
Ich finde allerdings nicht mehr die Option “Extras” → “Makros” → “Makros aufzeichnen”. Kann mir da jemand helfen?
Da ich schon lange keine Makros mehr erstellt habe, weiß ich nicht, seit welcher Version das abhanden gekommen ist.

Im Kern geht es mir aber um ein anderes Problem - und dafür möchte ich gern ein Makro als “workaround” benutzen:
Ich möchte gern mit Draw eine Vorlage erstellen. Diese soll als png-Exportiert werden. Allerdings stört mich, dass ich jedes Mal von Hand die Auflösung (Pixel) ändern muss. Ich bin inzwischen so weit, dass ich die Seitenvorlage (eigentlich A4) so weit vergrößere, dass ich beim Klick auf OK die passenden Pixel erhalte. Dann ist es aber eben nicht mehr A4.

Außerdem möchte ich das Makro gern haben, damit ich auch die anderen Werte wie Dateinamen, Kompression etc. nicht mehr von Hand einstellen muss. Das Makro wäre mir also eigentlich schon ganz lieb.

Danke für Hilfe/Ideen!

[PKG]

Hast du das Aufzeichnen von Makros denn erlaubt?

Extras → Optionen → LibreOffice → Erweitert ► [x] Makroaufzeichnung ermöglichen.

[Schwedenbitter]

Ja, das habe ich.
Unter Writer sehe ich es auch. Dort kann ich nach dem Aktivieren auch Markos erstellen.
Ich habe mir jetzt erstmal damit geholfen, dass ich das Makro im Writer aufzeichne, abspeichere und dann in Drwa benutze. Aber das kann’s doch nicht sein.
Abgesehen davon nervt mich, dass mir trotzdem der Dialog eingeblendet wird.

Das Makro sieht so aus:

sub png_export
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dim args1(3) as new com.sun.star.beans.PropertyValue
args1(0).Name = "URL"
args1(0).Value = "file:///Kopfbogen.png"
args1(1).Name = "FilterName"
args1(1).Value = "draw_png_Export"
args1(2).Name = "FilterData"
args1(2).Value = Array(Array("Compression",0,9,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("Interlaced",0,0,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("Translucent",0,0,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("PixelWidth",0,2503,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("PixelHeight",0,3540,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("LogicalWidth",0,66216,com.sun.star.beans.PropertyState.DIRECT_VALUE),Array("LogicalHeight",0,93650,com.sun.star.beans.PropertyState.DIRECT_VALUE))
args1(3).Name = "SelectionOnly"
args1(3).Value = false
dispatcher.executeDispatch(document, ".uno:ExportTo", "", 0, args1())

end sub

[Schwedenbitter]

Die Forumsoftware zeigt meine Leerzeilen nicht an
Damit wird es unübersichtlich. Sorry dafür!
Nehme alles zurück. Jetzt sieht es irgendwie schön(er) aus.

[Villeroy]

Dispatches aufzeichnen geht nur mit Writer und Calc.