AleX napsal(a): >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 > > > No, mi to funguje, kdyz zadam sitovou tiskarnu a natvrdo tu svoji lokalni. Ale chci, aby se dal prog pouzit i pro jine PC v siti, a bylo by tedy treba to u kolegu, kteri by ho chteli pouzivat, zadavat to jednotlive na kazdem PC extra. Pokud by se podarilo vyresit ukladani default. tiskarny do promenne, dal by se prog. pouzivat kdekoliv (ta sitova tiskarna je pouzivana odevsad stejna, meni se jenom PC, ze kterych se to k tisku na ni posila). OVReceived on Thu, 12 Jan 2006 09:19:42 +0100
This archive was generated by hypermail 2.1.8 : 12. 01. 2006, 09:19 CET