Libre Office kézi duplex nyomtatás fejlesztés

Iroda

Jelenleg páratlan, majd fordítás után a páros oldalakat nyomtatom Libre Officeban, lehet másnak kényelmes, de nekem nem áll kézre, és egyszerűbben szeretnék nyomtatni.

Kerestetem kiterjesztések között, de nem találtam olyan modult, amivel egy kattintásra ez a feladat megoldható lenne.

Cél:
-beépül a fájl->nyomtatás...->oldalelrendezés menüpontba "kézi duplex nyomtatás" vagy hasonló néven
-ezt kiválasztva automatikusan kinyomtatja az adott dokumentumot először a páros oldalakat, majd felugró üzenet után pedig a páratlanokat
-legyen fordított sorrend lehetőség

Nektek ez mennyire jelent problémát, mennyi energia lehet összerakni egy ilyen kiterjesztést, vagy fejlesztést?

Lenne a feladatra jelentkező, aki adott összegért elvállalná?

Fizetnétek-e hozzájárulást a munkájához (azaz közösen össze dobnánk-e a pénzt, és vagy tudást)?

  • 2753 megtekintés

( gemnon v | 2015. 04. 01., sze – 19:51 )

Makró nem játszik? 


' Disclaimer: This is not for a job interview :P 
' Does not reflect my coding skills or anything else 

Sub MyDuplexPrint
DIM oDoc, oSettings,oArgs AS Object
Dim aPrintOptions(2) as new com.sun.star.beans.PropertyValue
oDoc = ThisComponent
oSettings = oDoc.createInstance("com.sun.star.text.DocumentSettings")
oSettings.PrintLeftPages = FALSE
oSettings.PrintRightPages = TRUE
oSettings.PrintReversed = FALSE
oDoc.Print(aPrintOptions())
MsgBox "Fordítsd meg a lapot ha kijött légyszi."     
oSettings.PrintLeftPages = TRUE
oSettings.PrintRightPages = FALSE
oSettings.PrintReversed = TRUE
oDoc.Print(aPrintOptions())
MsgBox "Köfi."     
End Sub