Macro Establecer Áreas de Impresión

Esta macro activa las tres primeras hojas y fija el área de impresión en el rango seleccionado, de esta forma para un conjunto de hojas no tendríamos que estar seleccionando cada una de ellas para fijarlas, si en todas es es igual podríamos usarla para imprimir el libro de Excel de una forma rápida.

Sub Area_Impresion()

‘ Seleccionar Áreas
    Dim i As Integer

        For i = 1 To 3
            Sheets(i).Activate
            Range(“B5:D10,B13:D20”).Select
            ActiveSheet.PageSetup.PrintArea = “$B$5:$D$10,$B$13:$D$20”
        Next i
‘ Imprimir las Áreas

    ActiveWorkbook.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
    
End Sub

Anuncios

9 comentarios en “Macro Establecer Áreas de Impresión

      • Esto no parece correcto, pues el rango para el área de impresión se determina en la fórmula: ActiveSheet.PageSetup.PrintArea = “$B$5:$D$10,$B$13:$D$20”; y no en la anterior, que es solo la selección de un rango.

        La pregunta es si se puede escribir el área de impresión con variables y no con una linea de texto “…”

        Si aprendo cómo, actualizaré mi comentario.

        Saludos!

      • Hola, gracias por seguir el blog.

        Es cierto que la parte de código Range(“B5:D10,B13:D20”).Select , selecciona las celdas, está añadido sólo para mostrar el rango seleccionado en la impresión a modo informativo, lo puedes quitar. Lo suelo poner por si se ejecuta la macro paso a paso “F8”, a veces ayuda a entenderla.
        Se puede escribir el área de impresión utilizando variables, es lo habitual, este ejemplo es sólo un ejemplo sencillo.
        Puedes echar un vistazo al post https://exceltrucos.com/2016/01/12/comparar-listados/ , en este código puedes ver cómo asignar a una variable el valor de la fila o columna.

        También tienes un manual muy bueno dónde explica muy bien el trabajo con Variables. https://exceltrucos.com/2014/11/25/manual-excel-macros-vba-visual-basic/

  1. Hola.
    Buscando por la red sobre el área de impresión en excel, llegue a tu foro y veo que tenias un manual para el uso de la variables en excel, lo quise bajar para aprender un poco más sobre el tema, pero desgraciadamente ya no esta donde el enlace.

    Te sería posible enviarmelo si aún lo tienes a mí correo.

    Te agradezco anticipadamente

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s