Makro obrót strony wraz z obiektem LO Draw

[MichalElo]

Dzień dobry,
W LibreOffice Draw potrzebuje makra które obróci stronę o 90 stopni w prawo wraz z obiektem znajdującym się na stronie, oczywiście musi zachować odpowiednie proporcje i pozostawić obiekt na stronie.
Przez Draw otwieram pdfa i chciałbym żeby ten obrót działał tak jak w programach przystosowanych do pdfa typu adobe czy przeglądarki chrome lub edge
Utworzyłem makro, które zmienia orientacje mojej strony i nic poza tym:( :

sub Main
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "AttributePageSize.Width"
args1(0).Value = 29700
args1(1).Name = "AttributePageSize.Height"
args1(1).Value = 21001

dispatcher.executeDispatch(document, ".uno:AttributePageSize", "", 0, args1())
end sub
Zapomniałem o rzeczy dość istotnej czyli chciałbym obracać jedną stronę (slajd tak jest to nazwane w drawie), bo teraz obraca mi wszystkie

[Jan_J]

Nigdy tego nie robiłem.

Wątek https://forum.openoffice.org/en/forum/v ... 11&t=87222 sugeruje, że nie da się w Draw ustalić osobnych atrybutów dla jednej strony, ponieważ dokument odg korzysta z jednego stylu strony.

Jeśli zamierzasz udostępniać swoją pracę jako pdf, to nie potrzebujesz OpenOffice. Wygodniej jest zastosować specjalistyczne narzędzie do transformowania pdf-ów. Ja używam pdftk. Jeśli na przykład chcesz obrócić w prawo stronę nr 2, to da się to zrobić tak (w konsoli systemowej):

Kod: Zaznacz cały

pdftk nazwa_dokumentu.pdf cat 1 2east 3-end output nazwa_dokumentu_wynikowego.pdf

pdftk pobiera się stąd: https://www.pdflabs.com/tools/pdftk-the-pdf-toolkit/