Re: VBA-tisk

caf
a preco vlastne menis ten printer?
sub na tlacenie ma tieto parametre (teda aspov exceli):
 PrintOut([From], [To], [Copies], [Preview], [ActivePrinter], [PrintToFile],
[Collate], [PrToFileName])
nestacilo by do parametru ActivePrinter zadat ten tebou spominany text?


On 1/11/06, o.vahalik@atlas.cz <o.vahalik@atlas.cz> wrote:
>
> 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
>
>
>
>
> -----------------------------------------------------( reklama )-----
> Digitalni televize je jiz v Praze a Brne. Kdy dorazi k vam?
> Vse o digitalnim vysilani: pristroje, technologie, zakony, pokryti:
> Ctete DigiZone.cz (http://www.digizone.cz/)
> ---------------------------------------------------------------------
> --
> -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/ --
> -- Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/ --
> -- Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/ --
>
>


--
AleX