Objeto HeaderFooter (Word)
Representa un solo encabezado o pie de página. El objeto HeaderFooter es un miembro de la HeadersFooters colección. La colección HeadersFooters incluye todos los encabezados y pies de página en la sección del documento especificado.
Comentarios
Use Headers (Index) o Footers (Index), donde index es una de las constantes WdHeaderFooterIndex (wdHeaderFooterEvenPages, wdHeaderFooterFirstPage o wdHeaderFooterPrimary), para devolver un solo objeto HeaderFooter . En el ejemplo siguiente se cambia el texto de encabezado y pie de página principal de la primera sección del documento activo.
With ActiveDocument.Sections(1)
.Headers(wdHeaderFooterPrimary).Range.Text = "Header text"
.Footers(wdHeaderFooterPrimary).Range.Text = "Footer text"
End With
También puede devolver un solo objeto HeaderFooter mediante la HeaderFooter propiedad con un objeto Selection.
Nota:
[!NOTA] No se puede agregar objetos HeaderFooter al conjunto HeadersFooters.
Utilice el DifferentFirstPageHeaderFooter propiedad con el objeto PageSetup para especificar una primera página diferente. En el ejemplo siguiente se inserta texto en el primer pie de página del documento activo.
With ActiveDocument
.PageSetup.DifferentFirstPageHeaderFooter = True
.Sections(1).Footers(wdHeaderFooterFirstPage) _
.Range.InsertBefore _
"Written by Joe Smith"
End With
Utilice el OddAndEvenPagesHeaderFooter propiedad con el objeto PageSetup para especificar encabezados de página pares e impares distintos y pies de página. Si la propiedad OddAndEvenPagesHeaderFooter es True, puede devolver un encabezado impar o pie de página utilizando wdHeaderFooterPrimary y puede devolver un encabezado o pie de página par mediante wdHeaderFooterEvenPages.
Utilice la ventana Agregar método con el objeto PageNumbers para agregar un número de página a un encabezado o pie de página. En el siguiente ejemplo se agrega números de página al pie de página principal de la primera sección del documento activo.
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With
Propiedades
| Nombre |
|---|
| Aplicación |
| Creator |
| Exists |
| Índice |
| IsHeader |
| LinkToPrevious |
| PageNumbers |
| Parent |
| Rango |
| Shapes |
Vea también
Referencia de modelos de objetos de Word
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.