Mudar de impressora

26/05/2007 - 02:09 por Albino | Informe spam
Olá
Mi duda és la seguiente:
Tengo una macro para hacer la impression de la hoja2 en determinada
impressora que se elije en la caja de dialogo de impressoras.
Hasta aqui tudo bien, pero lo que passa és que el icono de impressão rapida
en la barra de herramientas assume por defecto la impressora seleccionada
anteriormente. Esso no me conviene una vez las restantes hojas tendran de
ser impressas em lá impressora prédefinida e no en esta que fue elejida.
Como ni todas las personas estão dispiertas para elegir de novo la
impressora predefenida, quando clican en el icono las cópias van a cair en
el sitio errado.
Que podré alterar em mi código para solucionar el problema?
Puedo postar el código si necessário.
Gracias e perdon mi espanhol, és decir "(Portunhol").
Albino

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
26/05/2007 - 03:18 | Informe spam
hola, Albino !

Tengo una macro para hacer la impression de la hoja2 en... impressora que se elije en la caja de dialogo de impressoras.
... el icono de impressao rapida en la barra de herramientas assume por defecto la impressora seleccionada anteriormente.
... no me conviene una vez las restantes hojas tendran de ser impressas em la impressora predefinida e no en esta que fue elejida.
... ni todas las personas estao dispiertas para elegir de novo la impressora predefenida
quando clican en el icono las cópias van a cair en el sitio errado.
Que podre alterar em mi codigo para solucionar el problema?
Puedo postar el codigo si necessario. Gracias e perdon mi espanhol, es decir "(Portunhol").



prueba a 'capturar' cual es la impresora ANTES de mostrar la caja de dialogo y la restableces al final de tu macro de impresion [p.e.]

Dim ImpresoraOriginal As String
ImpresoraOriginal = Application.ActivePrinter

' aqui va tu codigo de impresion *controlada* '
' y ya que se termine, vuelves a poner la impresora original...

Application.ActivePrinter = ImpresoraOriginal

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 Albino
27/05/2007 - 21:02 | Informe spam
Hector Miguel
Muchas gracias solo tuve de hacer unas pequenhas alteraciones de espanhol
para inglês cambié "ImpressoraOriginal" por Deflaut_Impr" e ya funcionó
Muchas gracias.

"Héctor Miguel" escreveu na mensagem
news:uaV0%
hola, Albino !

Tengo una macro para hacer la impression de la hoja2 en... impressora que
se elije en la caja de dialogo de impressoras.
... el icono de impressao rapida en la barra de herramientas assume por
defecto la impressora seleccionada anteriormente.
... no me conviene una vez las restantes hojas tendran de ser impressas
em la impressora predefinida e no en esta que fue elejida.
... ni todas las personas estao dispiertas para elegir de novo la
impressora predefenida
quando clican en el icono las cópias van a cair en el sitio errado.
Que podre alterar em mi codigo para solucionar el problema?
Puedo postar el codigo si necessario. Gracias e perdon mi espanhol, es
decir "(Portunhol").



prueba a 'capturar' cual es la impresora ANTES de mostrar la caja de
dialogo y la restableces al final de tu macro de impresion [p.e.]

Dim ImpresoraOriginal As String
ImpresoraOriginal = Application.ActivePrinter

' aqui va tu codigo de impresion *controlada* '
' y ya que se termine, vuelves a poner la impresora original...

Application.ActivePrinter = ImpresoraOriginal

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Respuesta Responder a este mensaje
#3 Héctor Miguel
28/05/2007 - 01:58 | Informe spam
hola, Albino !

... solo tuve de hacer unas pequenhas alteraciones de espanhol para ingles
cambie "ImpressoraOriginal" por Deflaut_Impr" e ya funciono ...



[creo que] entre el "Portunhol" y el "Espanglish"... nos van a hacer pedazos :))
-> que te parece si cambias nuevamente de Deflaut_Impr por: -> Default_Printer :D

saludos,
hector.
Respuesta Responder a este mensaje
#4 Albino
28/05/2007 - 23:33 | Informe spam
Holá Hector Miguel
Pienso que lo voy a dejar como está, una vez que está a funcionar.
Si aparecer alguno problema lo cambio, és que mi sistema (Windows e Office)
estan em Portugues
Gracias
"Héctor Miguel" escreveu na mensagem
news:u%
hola, Albino !

... solo tuve de hacer unas pequenhas alteraciones de espanhol para
ingles
cambie "ImpressoraOriginal" por Deflaut_Impr" e ya funciono ...



[creo que] entre el "Portunhol" y el "Espanglish"... nos van a hacer
pedazos :))
-> que te parece si cambias nuevamente de Deflaut_Impr por: ->
Default_Printer :D

saludos,
hector.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida