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

#1 17. 10. 2010 19:24:31

sedlacekdan
Moderátor
Místo Nehvizdy
Registrace: 21. 6. 2010
Příspěvků: 617

tisk makrem

Dobrý den,
lze makro pro tisk napsat tak, aby se otevřelo okno s možností výběru tiskárny? Všechny ostatní možnosti jsem si v makru nastavil (tisk na šířku...) ale potřeboval bych, aby jsem měl možnost vybrat tiskárnu (stejně jako Ctrl+P) podle svých potřeb. Soubor bude využívat více lidí a já dopředu neznám nastavení jejich tiskáren, ale potřebuji mít omezení tisku, která jsem si v makru nastavil.

Díky za odpověď
Sedláček


Linux Mint 16 Petra - Apache OpenOffice 4.0.1
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte tak orientaci na fóru při vyhledávání řešení problémů
JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

Offline

#2 24. 10. 2010 11:23:14

PavelH
Člen
Místo Česká Lípa
Registrace: 14. 3. 2008
Příspěvků: 140

Re: tisk makrem

Nepomůže tenhle anglický návod?
http://www.suite101.com/content/openoff … ent-a64134

---
Sub PrintMe
thisComponent.Print (Array ())
End Sub
---

Offline

#3 24. 10. 2010 15:14:48

sedlacekdan
Moderátor
Místo Nehvizdy
Registrace: 21. 6. 2010
Příspěvků: 617

Re: tisk makrem

Díky
z podobného makra jsem vycházel,
formát stránky i počet stran mám v makru nastaveno, problém je s výběrem tiskárny. Buď mám možnost tisku s tiskárnou nastavenou jako výchozí, nebo s tiskárnou kterou nastavím přímo v makru.

Sub Tisk 

dim argPrinter(1) as new com.sun.star.beans.PropertyValue
 argPrinter(0).Name="PaperOrientation"
 argPrinter(0).Value=com.sun.star.view.PaperOrientation.LANDSCAPE
 argPrinter(1).Name="Name"
 argPrinter(1).Value = "????????"' TADY MÁM TEN PROBLÉM
ThisComponent.Printer=argPrinter()
 
dim argPrint(0) as new com.sun.star.beans.PropertyValue
 argPrint(0).Name="Pages"
 argPrint(0).Value="1"
ThisComponent.Print(argPrint())
end sub

Potřeboval bych nechat výběr tiskárny na tom kdo bude dokument tisknout.
Věřte, že s dokumentem budou pracovat lidé pro které je i Ctrl+P problém.
Nevím ani názvy ani počet tiskáren, které budou využívány.
Možná že to nejde??
Díky


Linux Mint 16 Petra - Apache OpenOffice 4.0.1
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte tak orientaci na fóru při vyhledávání řešení problémů
JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

Offline

#4 27. 10. 2010 19:27:57

sedlacekdan
Moderátor
Místo Nehvizdy
Registrace: 21. 6. 2010
Příspěvků: 617

Re: tisk makrem

Tak jsem to obešel přes formulářový seznam, který mi do buňky zapisuje název tiskárny a odtud si ji bere makro. Jen musím zjisti názvy všech tiskáren.
Škoda, že to nejde jednodušeji.


Linux Mint 16 Petra - Apache OpenOffice 4.0.1
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte tak orientaci na fóru při vyhledávání řešení problémů
JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

Offline

Zápatí