Compartir a través de

Propiedad PageNumbers.HeadingLevelForChapter (Word)

  • Artículo

Devuelve o establece el nivel de título que se aplica a los títulos de capítulo del documento. Long de lectura y escritura.

Sintaxis

expresión. HeadingLevelForChapter

Expresión Variable que representa un objeto "PageNumbers".

Comentarios

La propiedad HeadingLevelForChapter puede ser un número entre 0 (cero) al 8, que corresponde a los niveles de título 1 al 9.

Antes de crear números de página que incluyan números de capítulos, los títulos del documento deben tener un formato de esquema numerado que utilice estilos del cuadro de diálogo Numeración y viñetas. Para hacer esto en Visual Basic, utilice el método ApplyListTemplate.

Ejemplo:

La primera parte de este ejemplo se crea un nuevo documento, se agregan títulos de capítulo y saltos de página y, a continuación, aplica formato al documento con el último formato de esquema numerado en el cuadro de diálogo Numeración y viñetas. La segunda parte del ejemplo agrega números de página centrado - incluido el número de capítulo - al encabezado; un guión corto separa el número de capítulo y el número de página. El primer nivel de título se usa para el número de capítulo y números romanos en minúsculas se usan para el número de página.

Dim intLoop As Integer 
Dim hdrTemp As HeaderFooter 
 
Documents.Add 
For intLoop = 1 To 5 
 With Selection 
 .TypeParagraph 
 .InsertBreak 
 End With 
Next intLoop 
ActiveDocument.Content.Style = wdStyleHeading1 
ActiveDocument.Content.ListFormat.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdOutlineNumberGallery) _ 
 .ListTemplates(7) 
 
Set hdrTemp = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) 
 
With hdrTemp.PageNumbers 
 .Add PageNumberAlignment:=wdAlignPageNumberCenter 
 .NumberStyle = wdPageNumberStyleArabic 
 .IncludeChapterNumber = True 
 .HeadingLevelForChapter = 0 
 .ChapterPageSeparator = wdSeparatorEnDash 
End With

Consulte también

Objeto de colección PageNumbers

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.