Compartir a través de

Propiedad PageNumbers.ChapterPageSeparator (Word)

  • Artículo

Devuelve o establece el carácter separador que se usa entre el número de capítulo y el número de página. WdSeparatorType de lectura y escritura.

Sintaxis

expresión. ChapterPageSeparator

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

Comentarios

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:

En la primera parte de este ejemplo se crea un documento nuevo, se agregan títulos de capítulo y saltos de página y luego se aplica formato al documento utilizando el último formato de esquema numerado que aparece en el cuadro de diálogo Numeración y viñetas. En la segunda parte del ejemplo, se agregan números de página centrados, incluido el número de capítulo, al encabezado; un guión largo separa el número de capítulo del número de página.

Dim intLoop As Integer 
Dim hfTemp 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 hfTemp = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) 
With hfTemp.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.