Fórum pro uživatele kancelářského balíku OpenOffice | LibreOffice
 

#1 Re: Calc » makro - format strany - VYŘEŠENO » 26. 5. 2016 11:50:29

Len doplnim makro na vytvorenie noveho stylu. Potom uz vyssie popisovane makro od lp. funguje a urobi, co som chcel.

sub a5
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args3(1) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Param"
args3(0).Value = "A5"
args3(1).Name = "Family"
args3(1).Value = 8
dispatcher.executeDispatch(document, ".uno:StyleNewByExample", "", 0, args3())
end sub

Dakujem za pomoc.

#2 Re: Calc » makro - format strany - VYŘEŠENO » 19. 5. 2016 07:52:17

toto sa mi zasekne pri riadku:

	oAktPageStyle = oPageStyles.getByName("A5")

s chybovou hlaskou:

Vyskytla sa výnimka
Type: com.sun.star.container.NoSuchElementException

#3 Re: Calc » makro - format strany - VYŘEŠENO » 18. 5. 2016 15:32:34

NO! Vysledkom je, ze v dokumente, ktory mam spracovat, vytvorim novy list. Do tohto listu skopirujem povodny obsah a stary list s udajmi zmazem... a vsetko pracuje, ako ma!
Ak sa v tom chce niekto povrtat, zahadny dokument mozem poslat mailom.

Dakujem za pomoc, "chyba byla odstranena, aniz byla nalezena".

#4 Re: Calc » makro - format strany - VYŘEŠENO » 18. 5. 2016 13:09:02

makro je:

doc = thisComponent
Dim stranka(0) as new com.sun.star.beans.PropertyValue
Dim velkost as new com.sun.star.awt.Size
velkost.Width = 14800 ' sirka
velkost.Height = 21000 ' vyska
stranka(0).Name = "PaperSize"
stranka(0).Value = velkost
doc.Printer = stranka()


novy list (nie Sesit) vytvaram takto:

doc = thisComponent
doc.Sheets.insertNewByName("katalog",1)


Je jedno, ci najprv nastavim rozmery strany a potom vytvorim list, alebo najprv list a potom rozmery - sprava sa to rovnako. Mam LO 5.0.3.2 na xubuntu.
Ide o to, ze by som potreboval z povodneho listu (A4) vybrat udaje do noveho, z ktoreho by mal byt vystup na A5. Potreboval by som to aplikovat na viacero suborov (nie listov).

#5 Re: Calc » makro - format strany - VYŘEŠENO » 18. 5. 2016 10:33:43

Prave to riesenie mi nastavuje len aktualny list sad
Novovytvoreny ma predvolene hodnoty.

#6 Calc » makro - format strany - VYŘEŠENO » 18. 5. 2016 08:22:49

gelo
Odpovědí: 15

Vie mi prosim niekto poradit, ako automaticky nastavit format strany (format papiera, okraje) pri vytvoreni noveho listu cez makro? Zaznam makra skonci na ".uno:PageFormatDialog". Dakujem.

Zápatí

Používáme FluxBB