Propriedade PageNumbers.RestartNumberingAtSection (Word)
True se a numeração de página começa em 1 no início da seção especificada. Boolean de leitura/gravação.
Sintaxe
expression. RestartNumberingAtSection
Expressão Uma expressão que retorna um objeto de coleção 'PageNumbers'.
Comentários
Se definido como False, a propriedade RestartNumberingAtSection substituirá a propriedade StartingNumber assim que numeração de página pode continuar da seção anterior.
Exemplo
Este exemplo adiciona os números de página aos cabeçalhos do documento ativo e define que a numeração de páginas recomece em 1 no início de cada seção.
ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary) _
.PageNumbers.Add Pagenumberalignment:=wdAlignPageNumberCenter
For Each s In ActiveDocument.Sections
With s.Headers(wdHeaderFooterPrimary).PageNumbers
.RestartNumberingAtSection = True
.StartingNumber = 1
End With
Next s
Confira também
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.