Propriedade PageNumbers.HeadingLevelForChapter (Word)

  • Artigo

Retorna ou define o estilo de nível de título que é aplicado aos títulos de capítulo no documento. Long de leitura/gravação.

Sintaxe

expression. HeadingLevelForChapter

Expressão Uma variável que representa um objeto 'PageNumbers'.

Comentários

A propriedade HeadingLevelForChapter pode ser um número de 0 (zero) a 8, correspondendo aos níveis de título 1 a 9.

Antes de criar os números de página que incluem números de capítulo, os títulos do documento devem ter um formato de estrutura de tópicos numerados aplicado que usa os estilos de caixa de diálogo marcadores e numeração. Para fazer isso no Visual Basic, use o método ApplyListTemplate.

Exemplo

A primeira parte deste exemplo cria um novo documento, adiciona títulos de capítulo e quebras de página e formata o documento usando o formato de estrutura de tópicos numerados último listado na caixa de diálogo marcadores e numeração. A segunda parte do exemplo adiciona números de página centralizados - incluindo o número do capítulo - ao cabeçalho; um travessão separa o número do capítulo e o número da página. O primeiro nível de título é usado para o número do capítulo e algarismos romanos minúsculos são usados para o número da 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

Confira também

Objeto da coleção PageNumbers

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.