Evento Imprimir

Hola:
Puedes mirar en la ayuda de Visual Basic de Word el Evento
DocumentBeforePrint y ver si te sirve.
Marta PM
Saúdos/Saludos
MVP Office


Gracias por votar si el post te parece útil

http://www.fermu.com


"Armando" wrote:

cordial Saludo

¿Cómo puedo capturar el evento "IMPRIMIR"?. Lo que necesito es ejecutar una
macro cada vez que se imprima.

gracias!!

Otra posible solución sería crear un módulo que incluyese dos macros como
estas:
Sub FilePrint()
'Con esto capturas el evento que se produce al ir al menú Archivo / Imprimir
'Aquí introduces la ruta de la macro que quieres ejecutar con referencia al
proyecto, al módulo y al nombre de la macro que desees ejecutar
Application.Run MacroName:="Normal.NewMacros.Macro11"
End Sub
Sub FilePrintDefault()
'Con esto capturas el evento que se produce al darle al botón de la
impresora en la barra de herramientas
Application.Run MacroName:="Normal.NewMacros.Macro11"
End Sub


Marta PM
Saúdos/Saludos
MVP Office


Gracias por votar si el post te parece útil

http://www.fermu.com


"Armando" wrote:

cordial Saludo

¿Cómo puedo capturar el evento "IMPRIMIR"?. Lo que necesito es ejecutar una
macro cada vez que se imprima.

gracias!!

Hola Marta..
Estoy haciendo mis primeras pruebas y coloco un msgbox("Hola Mundo") en
estas dos funciones (SubFilePrint() y Sub FilePrintDefault()) y
FUNCIONA...pero no continua con la impresion. ¿Qué debo hacer? Gracias

"Marta PM [MVP Office]" escribió:

Otra posible solución sería crear un módulo que incluyese dos macros como
estas:
Sub FilePrint()
'Con esto capturas el evento que se produce al ir al menú Archivo / Imprimir
'Aquí introduces la ruta de la macro que quieres ejecutar con referencia al
proyecto, al módulo y al nombre de la macro que desees ejecutar
Application.Run MacroName:="Normal.NewMacros.Macro11"
End Sub
Sub FilePrintDefault()
'Con esto capturas el evento que se produce al darle al botón de la
impresora en la barra de herramientas
Application.Run MacroName:="Normal.NewMacros.Macro11"
End Sub


Marta PM
Saúdos/Saludos
MVP Office


Gracias por votar si el post te parece útil

http://www.fermu.com


"Armando" wrote:

> cordial Saludo
>
> ¿Cómo puedo capturar el evento "IMPRIMIR"?. Lo que necesito es ejecutar una
> macro cada vez que se imprima.
>
> gracias!!

Y si debajo de la macro que ejecutas pones la instrucción Application.PrintOut
¿funciona?
Marta PM
Saúdos/Saludos
MVP Office


Gracias por votar si el post te parece útil

http://www.fermu.com


"Armando" wrote:

Hola Marta..
Estoy haciendo mis primeras pruebas y coloco un msgbox("Hola Mundo") en
estas dos funciones (SubFilePrint() y Sub FilePrintDefault()) y
FUNCIONA...pero no continua con la impresion. ¿Qué debo hacer? Gracias

"Marta PM [MVP Office]" escribió:

> Otra posible solución sería crear un módulo que incluyese dos macros como
> estas:
> Sub FilePrint()
> 'Con esto capturas el evento que se produce al ir al menú Archivo / Imprimir
> 'Aquí introduces la ruta de la macro que quieres ejecutar con referencia al
> proyecto, al módulo y al nombre de la macro que desees ejecutar
> Application.Run MacroName:="Normal.NewMacros.Macro11"
> End Sub
> Sub FilePrintDefault()
> 'Con esto capturas el evento que se produce al darle al botón de la
> impresora en la barra de herramientas
> Application.Run MacroName:="Normal.NewMacros.Macro11"
> End Sub
>
>
> Marta PM
> Saúdos/Saludos
> MVP Office
>
>
> Gracias por votar si el post te parece útil
>
> http://www.fermu.com
>
>
> "Armando" wrote:
>
> > cordial Saludo
> >
> > ¿Cómo puedo capturar el evento "IMPRIMIR"?. Lo que necesito es ejecutar una
> > macro cada vez que se imprima.
> >
> > gracias!!