pedromgantunes Posted June 2, 2009 at 05:45 PM Report #269349 Posted June 2, 2009 at 05:45 PM Boa tarde Gostaria de saber como resolver um problema ao imprimir para uma impressora que está ligada a outro computador. O código que estou a utilizar é o seguinte: Application.ActivePrinter = "\\KANBAN004\Samsung Universal Print Driver em Ne03:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "\\KANBAN004\Samsung Universal Print Driver em Ne03:", Collate:=True Mas dependendo do computador donde é executada a folha de cálculo o valor do Ne03, altera pode ser Ne01, ou Ne02, o que provoca um erro na macro. ? Obrigado.
jmaocubo Posted June 3, 2009 at 06:08 PM Report #269712 Posted June 3, 2009 at 06:08 PM Boa tarde Gostaria de saber como resolver um problema ao imprimir para uma impressora que está ligada a outro computador. O código que estou a utilizar é o seguinte: Application.ActivePrinter = "\\KANBAN004\Samsung Universal Print Driver em Ne03:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "\\KANBAN004\Samsung Universal Print Driver em Ne03:", Collate:=True Mas dependendo do computador donde é executada a folha de cálculo o valor do Ne03, altera pode ser Ne01, ou Ne02, o que provoca um erro na macro. ? Obrigado. Viva... Porque não utilizas o Application.Dialogs(xlDialogPrinterSetup).Show para que te abra um menu das impressoras que tens instaladas na rede. é assim que faço!!! poderá resultar contigo
pedromgantunes Posted June 3, 2009 at 06:37 PM Author Report #269725 Posted June 3, 2009 at 06:37 PM Essa é uma possibilidade mas gostaria que imprimisse sempre na mesma impressora, uma vez que as pessoas que trabalham com o programa não tem conhecimentos de informática. O programa serve para registar avarias em equipamentos e enviar uma folha de obra para o departamento de manutenção.
vbtipo Posted June 3, 2009 at 07:06 PM Report #269727 Posted June 3, 2009 at 07:06 PM Por acaso se a impressora que utilizas na rede estiver em predifinição e se ninguém lá mexer é só imprimires. Não vais ter nenhum desses problemas que estais praí a criar. Lema: Se eu não saber de alguma coisa não se preocupem porque tento sempre ajudar alguma coisita, nem que seja, por palpites/sugestões.
pedromgantunes Posted June 12, 2009 at 07:57 AM Author Report #271607 Posted June 12, 2009 at 07:57 AM OK. Obrigado
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now