IMPRIMIR TODOS LOS LIBROS ABIERTOS

[falexramos]

buenas tengo una consulta; deseo imprimir todos los libros que tengo abiertos de una sola, aveces tengo 20 a veces 10 esto varia, para imprimir tengo el sigueinte codigo pero no se como hacer para...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

Hola! falexramos. Con

Sub IMPRIMIR_LIBROS()
Dim myBook As Workbook
For Each myBook In Workbooks

If myBook.Name <> ThisWorkbook.Name Then
  With myBook: .PrintOut: .Close False: End...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[falexramos]

gracias Cacho R., era justo lo que necesitaba.

 

[Cacho R]

Wowwwwwww...

¡Parece que estabas esperando una respuesta con ansias!... (jajajajajajaja)

Saludos, Cacho R.