VBA-tisk

From: <o.vahalik (zavinac) atlas.cz>
Date: 11. 01. 2006, 20:12 CET
Ahoj.
Mam napsany programek ve VBA Excel,je vytvoren word dokument a poslan na sitovou tiskarnu. Na PC je nastavena default tiskarna, kterou bych potreboval po vytisteni na sitove tiskarne vratit. Jde to ale jenom, pokut to nastavim natvrdo. kod vypada asi takto:

puvodnitiskarna= Application.ActivePrinter 'ulozeni puvodni tiskarny do promenne

Application.ActivePrinter = "HP LaserJet 4050 Series PCL 6 on NE01:"
'Sitova tiskarna, dostal jsem od spravce site, tam potrebuju vytisknout jenom ten konkretni dokument   

Application.PrintOut Filename:="", Range:=wdPrintAllDocument, Item:= atd...   
    
Application.ActivePrinter = puvodnitiskarna

Zustane mi ale nastavena ta sitovka
Pokud zadam misto promenne nazev natvrdo, nastavi se

Ten kod je samosebou zkraceny, ale muzu poslat vetsi fragment, ale myslim, ze podstata je zrejma?
Diky

OV
Received on Wed, 11 Jan 2006 20:12:53 +0100

This archive was generated by hypermail 2.1.8 : 11. 01. 2006, 20:13 CET