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

¿Cómo insertar el valor de una celda en la cabecera o el pie de página de Excel?

AutorXiaoyang Fecha de modificación

En Microsoft Excel, es sencillo insertar información como la ruta del archivo, el nombre del archivo, la fecha actual u otros detalles integrados en las cabeceras o pies de página mediante las funciones nativas de Excel. Sin embargo, hay situaciones en las que necesita usar el contenido real de una celda específica como cabecera o pie de página. Esta funcionalidad no está disponible directamente en la interfaz estándar de Excel, lo que plantea la pregunta: ¿cómo puede insertar el valor de una celda en la cabecera o el pie de página de su hoja de cálculo? Muchos usuarios tienen este requisito al preparar informes, formularios o exportaciones de datos en los que la información dinámica —como el nombre de un cliente o una fecha personalizada— debe aparecer en la cabecera o el pie de página impreso, de modo que cada copia refleje el contexto más actualizado procedente directamente de la hoja. Las soluciones que se presentan a continuación responden a esta necesidad, mostrando tanto enfoques con VBA como con herramientas de terceros, e indicando cuándo resulta más adecuado cada método.

Colocar el valor de una celda en la cabecera o el pie de página de una hoja de cálculo con código VBA

Colocar el valor de una celda en la cabecera o el pie de página de todas las hojas de cálculo con código VBA

Insertar información del archivo en la cabecera/pie de página con Kutools para Excel buena idea3

Copiar manualmente el contenido de la celda al cuadro de diálogo de cabecera o pie de página


Colocar el valor de una celda en la cabecera o el pie de página de una hoja de cálculo con código VBA

Si desea mostrar el contenido de una celda específica en la cabecera o el pie de página de su hoja de trabajo actual, no es posible hacerlo mediante la interfaz estándar de encabezados y pies de página de Excel. Sin embargo, puede lograrlo fácilmente con una sencilla macro de VBA.

Antes de ejecutar cualquier código VBA, asegúrese de guardar su libro de trabajo, ya que las macros modifican objetos y sus acciones no se pueden deshacer. Asimismo, compruebe que la configuración de Excel permita la ejecución de macros.

1. Active la hoja de cálculo en la que desea insertar el valor de una celda en la cabecera o el pie de página. Pulse ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo y pegue el siguiente código en la nueva ventana del módulo.

Código VBA: colocar el valor de una celda especificada en la cabecera de una hoja de cálculo

Sub HeaderFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftHeader = WorkRng.Range("A1").Value
End Sub

3. Pulse F5 (o haga clic en el botón Ejecutar) para ejecutar esta macro. Aparecerá un cuadro de diálogo que le pedirá que seleccione la celda cuyo valor desea utilizar en la cabecera.
Cuadro de diálogo para seleccionar una celda cuyo contenido desea colocar en el encabezado

4. Tras seleccionar la celda y hacer clic en Aceptar, el valor de la celda elegida se insertará en el encabezado izquierdo de su hoja de cálculo activa. Para verlo, vaya a Archivo > Imprimir(o use la vista de)Diseño de página). Vea el ejemplo siguiente:
El valor de la celda se inserta en el encabezado

Notas:

  • Si desea mostrar el contenido de la celda en el pie de página en lugar de en la cabecera, utilice el siguiente código. Los pasos son idénticos: basta con pegar este código en un módulo y ejecutarlo.

Código VBA: colocar el valor de una celda especificada en el pie de página de una hoja de cálculo

Sub FooterFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftFooter = WorkRng.Range("A1").Value
End Sub
  • Para cambiar la posición, sustituya LeftHeader o LeftFooter en el código por CenterHeader, RightHeader, CenterFooter o RightFooter, según sea necesario. Por ejemplo, para insertar el valor en el encabezado centrado, cambie LeftHeader por CenterHeader.
  • Asegúrese siempre de que la referencia de celda sea válida antes de ejecutar el script; de lo contrario, si hace referencia a una celda en blanco, la cabecera o el pie de página quedarán vacíos.
  • Tras ejecutar la macro, si modifica la celda de origen, la cabecera o el pie de página no se actualizarán automáticamente; deberá volver a ejecutar la macro para reflejar los cambios.
  • Este método VBA es ideal cuando desea automatizar acciones desde celda hasta cabecera sin necesidad de actualizaciones frecuentes, o cuando trabaja con plantillas cuyo contenido varía dinámicamente en cada impresión.
  • Si recibe una advertencia de “Macros deshabilitadas”, asegúrese de que la configuración de macros esté habilitada en Archivo > Opciones > Centro de confianza.

Colocar el valor de una celda en la cabecera o el pie de página de todas las hojas de cálculo con código VBA

Cuando necesite aplicar el valor de una celda específica como cabecera o pie de página en todas las hojas de su libro de trabajo, ejecutar el código anterior hoja por hoja resultaría muy laborioso. En estos casos, puede utilizar otra macro de VBA diseñada para insertar el contenido de una celda elegida en la cabecera o el pie de página de todas las hojas del libro con una sola operación. Esta solución es ideal al distribuir informes que requieren información coherente en cabeceras o pies de página en todo el documento.

1. Abra el libro de trabajo en el que desea aplicar el cambio y pulse ALT + F11 para abrir la ventana de Visual Basic para Aplicaciones.

2. En el editor de VBA, haga clic en Insertar > Módulo y, a continuación, copie y pegue la siguiente macro en la ventana del módulo.

Código VBA: colocar el valor de una celda especificada en el pie de página de todas las hojas de cálculo

Sub AddFooterToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftFooter = WorkRng.Range("A1").Value
Next
End Sub

3. Pulse F5 para ejecutar esta macro. Aparecerá un cuadro de diálogo que le permitirá seleccionar la celda cuyo valor aparecerá en el pie de página de cada hoja de cálculo.

Cuadro de diálogo para seleccionar una celda cuyo contenido desea colocar en el pie de página

4. Una vez que haya seleccionado la celda y haga clic en Aceptar, este valor se insertará automáticamente en el pie de página izquierdo de todas las hojas del libro. Para comprobar cómo ha quedado asignado, vaya a Archivo > Imprimir.
El valor de la celda se inserta en el pie de página

Notas:

  • Para utilizar el valor de una celda en la cabecera de todas las hojas de cálculo, aplique el siguiente código en su lugar. El procedimiento para introducirlo y ejecutarlo es idéntico:

Código VBA: colocar el valor de una celda especificada en la cabecera de todas las hojas de cálculo

Sub AddHeaderToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftHeader = WorkRng.Range("A1").Value
Next
End Sub
  • Para insertar el valor en la posición central o derecha de la cabecera o el pie de página, basta con sustituir LeftHeader/LeftFooter por CenterHeader/CenterFooter o RightHeader/RightFooter en el script.
  • Tenga en cuenta que las acciones de deshacer no afectan a los cambios realizados mediante macros VBA. Guarde su documento antes de ejecutarlas para evitar la pérdida de datos si el resultado no es el esperado.
  • Este enfoque es ideal para libros de trabajo cuyas hojas comparten los mismos requisitos de encabezado o pie de página. Si las hojas requieren contenido diferente, considere ejecutar la macro individualmente en cada una.
  • Si encuentra problemas en los que las cabeceras o pies de página no se actualizan como se espera, asegúrese de que ni la protección de hojas ni la protección del libro estén activadas.

Insertar información del archivo en la cabecera/pie de página con Kutools para Excel

Cuando necesite insertar de forma rápida y flexible información relacionada con el archivo —como el nombre de la hoja de cálculo, el nombre del libro de trabajo o la ruta del archivo— en la cabecera o el pie de página, Kutools para Excel ofrece una utilidad dedicada llamada Insertar información del libro. Esta herramienta resulta especialmente útil si prefiere una solución sin código, necesita procesamiento por lotes o desea insertar varias propiedades integradas del documento sin introducción manual ni riesgo de errores. Kutools hace que el proceso sea accesible tanto para usuarios que no quieren interactuar con VBA como para quienes necesitan actualizar regularmente cabeceras y pies de página según los metadatos del libro.

Kutools para Excelofrece más de 300 funciones avanzadas para simplificar tareas complejas, potenciando la creatividad y la eficiencia.Integrado con capacidades de IA, Kutools automatiza tareas con precisión, haciendo que la gestión de datos sea sencilla.Información detallada de Kutools para Excel...         Prueba gratuita...

Después de instalar gratuitamenteKutools para Excel, siga estos pasos:

1. Vaya a la pestaña KUTOOLS PLUS y seleccione Libro > Insertar información del libro.
Opción Insertar información del libro en la pestaña Kutools de la cinta de opciones

2. En el cuadro de diálogo Insertar información del libro, seleccione la información específica que desee insertar (por ejemplo, ruta del libro de trabajo, nombre del archivo, nombre de la hoja de cálculo, etc.) en la sección Información. A continuación, indique si desea insertarla en el encabezado o en el pie de página marcando Encabezado o Pie de página.

Consejo: Puede elegir la posición dentro del encabezado o del pie de página —izquierda, centro o derecha— mediante las opciones de ubicación. Esto resulta especialmente útil en diseños estructurados, como colocar la ruta del archivo a la izquierda y el nombre de la hoja en el centro.
Cuadro de diálogo Insertar información del libro

3. Haga clic en Aceptar para aplicar la configuración. Para revisar los resultados, vaya a Vista > Diseño de página o utilice Archivo > Vista previa de impresión.
Encabezado con información del archivo insertada

Con la función Insertar información del libro, también puede insertar esta información directamente en celdas o en un rango de celdas, lo que le permite utilizar dichos datos en fórmulas, visualización o tareas adicionales de automatización.Haga clic aquí para obtener más información sobre esta utilidad.

Este método resulta especialmente útil para usuarios que desean acceder fácilmente a las propiedades del documento sin tener que interactuar con macros ni fórmulas. En comparación con la edición manual, Kutools garantiza coherencia y ahorra una cantidad considerable de tiempo, sobre todo para quienes necesitan actualizar con frecuencia las referencias del documento.

Si la información de su encabezado o pie de página no se actualiza automáticamente, verifique si el libro está configurado en Cálculo manual, ya que algunos encabezados y pies de página necesitan una actualización del documento para mostrar los datos más recientes.


Copiar manualmente el contenido de la celda al cuadro de diálogo de cabecera o pie de página

Si solo necesita actualizar ocasionalmente el encabezado o el pie de página con el contenido de una celda y prefiere evitar el uso de VBA y complementos, puede copiar el valor de la celda y pegarlo manualmente en el cuadro de diálogo de encabezado/pie de página. Para ello, haga doble clic en la sección de encabezado o pie de página en la vista de Diseño de página y pegue el valor mediante Ctrl+V. El inconveniente es que este método es totalmente manual: deberá actualizar el valor cada vez que cambie.


Al utilizar métodos manuales o basados en títulos de impresión, tenga en cuenta que son menos dinámicos para una inserción «real» en encabezados y pies de página, y requieren intervención manual cada vez que cambia la información subyacente. En cambio, las macros de VBA y herramientas como Kutools ofrecen flujos de trabajo optimizados y repetibles, especialmente útiles en libros grandes o en la generación automatizada de informes. Si experimenta comportamientos inesperados o errores con VBA, verifique siempre la configuración de seguridad de macros y compruebe si hay celdas bloqueadas o hojas de cálculo protegidas. Antes de usar complementos de terceros, asegúrese de que provengan de fuentes fiables y sean compatibles con su versión de Excel. Al trabajar con archivos sensibles o críticos, es recomendable guardar una copia de seguridad antes de ejecutar macros.

Demostración: Insertar información del libro a celda/encabezado/pie de página

 
Kutools para Excel: ¡Más de 300 herramientas útiles al alcance de su mano! Disfrute de funciones potenciadas por inteligencia artificial para trabajar de forma más inteligente y rápida.¡Descárguelo ahora!

Artículos relacionados:

¿Cómo insertar el nombre o la ruta del archivo en una celda, encabezado o pie de página en Excel?

¿Cómo insertar y eliminar encabezados, pies de página e imágenes en los encabezados de Excel?

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