KutoolsforOffice — Una solución, cinco potentes herramientas.Lograr más con menos esfuerzo.Venta de marzo: 20 % de descuento

¿Cómo aplicar encabezados o pies de página distintos en cada página de una hoja de cálculo de Excel?

AutoraSiluvia Fecha de modificación

De forma predeterminada, al añadir un encabezado o pie de página en una hoja de Excel, el contenido se aplica de manera uniforme en todas las páginas impresas. Este comportamiento estándar garantiza coherencia, pero en ocasiones puede necesitar que cada página muestre información diferente. Por ejemplo, al imprimir informes financieros, listas de estudiantes o formularios divididos en secciones, contar con un encabezado o pie de página independiente por página mejora la claridad y facilita la diferenciación entre secciones. Sin embargo, las herramientas nativas de Excel solo permiten definir un único encabezado o pie de página para todo el documento, lo que limita la flexibilidad sin recurrir a métodos avanzados. A continuación, le explicamos cómo configurar encabezados o pies de página únicos para cada página en su hoja de Excel.

Aplicar encabezados o pies de página diferentes en cada página con código VBA


Aplicar encabezados o pies de página diferentes en cada página con código VBA

La solución que se muestra a continuación emplea una macro VBA para asignar encabezados o pies de página específicos a cada página impresa. Este enfoque resulta ideal si cada sección de su documento —como capítulos, clases o informes mensuales— requiere un identificador único. Aunque implica una configuración inicial, una vez establecida permite imprimir rápidamente distintas secciones con encabezados o pies de página personalizados.

1. Pulse simultáneamente las teclas Alt+F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en Insertar > Módulo. A continuación, copie y pegue el código VBA que aparece a continuación en la ventana de Código. Si nunca ha trabajado con macros, los módulos son las secciones donde se almacena el código VBA para su ejecución. Consulte la captura de pantalla como guía:

Código VBA: Aplicar encabezados diferentes en cada página en Excel

Sub DifferentHeaderFooter()
    Dim ws As Worksheet
    Dim vLeft As Variant, vRight As Variant, xRg As Variant
    Set ws = ActiveSheet
    On Error Resume Next
    vLeft = Array("First page", "Second page", "Third page", "fourth page")
    xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200")

    Application.ScreenUpdating = False
    For i = 0 To UBound(vLeft)
        With ws.PageSetup
        .PrintArea = xRg(i)
        .LeftHeader = vLeft(i)
        End With
        ws.PrintPreview
    Next i
    Application.ScreenUpdating = True
    ws.PageSetup.PrintArea = ""
End Sub

copie y pegue el código en el módulo

Notas y explicación de parámetros:

1. En el código VBA, modifique la sección vLeft = Array(«[[PH_2]]», «Second page», «Third page», «fourth page»)para especificar el texto del encabezado o pie de página de cada página. Cada elemento de la matriz representa el contenido de una única página y debe corresponderse con los Área de impresión indicados a continuación.
2. En la sección xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200"), defina el rango de celdas para cada página impresa. Asegúrese de que estos rangos coincidan exactamente con las secciones de su hoja que desea imprimir y de que no se solapen. Puede ajustar las referencias de celda según la disposición real de sus datos, y añadir o eliminar secciones según necesite más o menos páginas.
3. Si prefiere utilizar pies de páginaen lugar de encabezados, basta con reemplazar Encabezadopor Pie de páginaen todo el código. Esto puede resultar útil para incluir números de página, avisos legales o información específica de cada sección.
4. Para obtener los mejores resultados, confirme que la configuración de impresión de la hoja coincide con los rangos definidos en el código y revise siempre las vistas previas antes de finalizar la impresión.

3. Pulse la tecla F5 para ejecutar la macro. Esto ejecutará el código y mostrará la ventana de Vista previa. Allí, haga clic en el botón Imprimir para comenzar a imprimir cada sección definida con su encabezado o pie de página correspondiente.

Nota: Si su hoja de cálculo tiene 4 áreas de impresión especificadas, debe hacer clic en el botón Imprimir cuatro veces —una por cada sección— para completar la impresión de todas las páginas con sus respectivos encabezados y pies de página. Esto se debe a que la macro imprime cada sección de forma secuencial, por lo que debe repetir la acción de impresión para cada una.

En resumen, aunque Excel no admite de forma nativa encabezados ni pies de página únicos para cada página dentro de una misma hoja de cálculo, las macros VBA ofrecen una solución práctica y personalizable. Verifique siempre su configuración y el resultado impreso, y considere alternativas para escenarios más complejos. Si con frecuencia necesita personalizar sus páginas impresas, invertir un poco de esfuerzo en automatizar este proceso con VBA puede ahorrarle una cantidad significativa de trabajo manual.

una captura de pantalla de kutools for excel ia

Descubra la magia de Excel con KUTOOLS AI

  • Ejecución inteligente: Realice operaciones en celdas, analice datos y cree gráficos con comandos sencillos.
  • fórmulas personalizadas: Cree fórmulas a medida para optimizar sus flujos de trabajo.
  • Programación en VBA: Escriba e implemente código VBA con facilidad.
  • Interpretación de fórmulas: Entienda las fórmulas complejas con facilidad.
  • Traducción de texto: Rompa las barreras del idioma directamente en sus hojas de cálculo.
Potencie sus capacidades en Excel con herramientas impulsadas por inteligencia artificial.Descárguelo ahora¡y experimente una eficiencia como nunca antes!

Las mejores herramientas de productividad para Office

🤖KUTOOLS AI Asistente: Revolucione Análisis de datos basándose en:Ejecución Inteligente   |  Generar código|  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos|  Invocar Funciones mejoradas
Funciones populares:Buscar, resaltar o Marcar duplicados   |  Eliminar filas en blanco   |  Combinar Columnas o celdas sin perder datos   |   Redondeo sin usar fórmulas...
Super BUSCARV:Búsqueda vertical (VLookup) con múltiples criterios  |  Búsqueda vertical (VLookup) con múltiples valores  |   Búsqueda vertical (VLookup) entre varias hojas   |   Coincidencia difusa....
Lista desplegable avanzada:Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple....
Gestor de columnas:Añadir un número específico de columnas|Mover columnas|Alternar el estado de visibilidad de columnas ocultas|Comparar rangos y columnas...
Funciones destacadas:Cuadrícula de enfoque   |  Vista de diseño   |Barra de fórmulas mejorada   | Gestor de libros y hojas   |  Biblioteca de recursos(Texto automático)|  Selector de Fecha   |  Combinar Hojas de Cálculo  |  Cifrar/Descifrar celdas   | Enviar correos electrónicos desde una lista   |  Super Filtro   |   Filtro especial(Filtrar celdas con fuente en negrita/cursiva/tachado...) ...
Principales conjuntos de herramientas 15:12 Herramientasde texto(Agregar texto,Eliminar caracteres específicos, ...)|   50+Tiposde gráfico(Diagrama de Gantt, ...)|   40+ Fórmulas prácticas(Calcular la edad basada en la fecha de nacimiento, ...)|   19 Herramientasde inserción(Insertar Código QR,Insertar imagen desde ruta, ...)|   12 Herramientasde conversión(Convertir a palabras,Conversión de moneda, ...)|   7 Herramientasde combinación y división(Combinar filas avanzado,Dividir celdas, ...)|...y muchas más
Use Kutools en su idioma preferido: compatible con inglés, español, alemán, francés, chino y 40+ más idiomas.¡

Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...


Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
  • ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!

Todos los complementos de Kutools en un solo instalador.

Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.

ExcelWordOutlookTabsPowerPoint
  • Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
  • Un instalador, una licencia— configuración en minutos (compatible con MSI)
  • Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
  • Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
  • La mejor relación calidad-precio— ahorre frente a la compra individual de complementos