Classe FootnoteOptions (Word VBA)
A classe FootnoteOptions representa as propriedades atribuídas a um intervalo ou uma seleção de notas de rodapé em um documento. Para usar uma variável de classe FootnoteOptions, ela primeiro precisa ser instanciada por exemplo
Dim fos as FootnoteOptions
Set fos = Selection.FootnoteOptions
LayoutColumns
Retorna ou define a maneira como as notas de rodapé são colocadas em colunas quando a seção que contém a marca de referência tem várias colunas. Leitura-gravação Long.
Selection.FootnoteOptions.LayoutColumns =
Location
Retorna ou define a posição de todas as notas de rodapé. Leitura/gravação WdFootnoteLocation. Os valores de retorno possíveis são wdBeneathText - Abaixo do texto atual, wdBottomOfPage - No final da página atual.
ActiveDocument.Footnotes.Location = wdBottomOfPage
NumberingRule
Retorna ou define a maneira como as notas de rodapé ou as notas de fim são numeradas após quebras de página ou quebras de seção. Leitura/gravação WdNumberingRule. Os valores de retorno possíveis são wdRestartContinuous - Os números são atribuídos continuamente, wdRestartPage - Os números são redefinidos para cada página, wdRestartSection - Os números são redefinidos para cada seção.
Set myRange = ActiveDocument.Sections(1).Range
If myRange.Footnotes.NumberingRule = wdRestartSection Then
myRange.Footnotes.NumberingRule = wdRestartPage
End If
NumberStyle
Retorna ou define o estilo de número para as notas de rodapé. Leitura/gravação WdNoteNumberStyle. Aqui você pode encontrar os valores possíveis para
Algumas das constantes WdNoteNumberStyle podem não estar disponíveis para você, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.
Selection.FootnoteOptions.NumberStyle = wdNoteNumberStyleArabic
StartingNumber
Retorna ou define o número inicial do rodapé. Long de leitura/gravação.
Selection.FootnoteOptions.StartingNumber =