Compartilhar via

Objeto Endnotes (Word)

  • Artigo

Uma coleção de objetos Endnote que representa todas as notas de fim em uma seleção, intervalo ou documento.

Comentários

Use a propriedade Endnotes para retornar a coleção Endnotes. O exemplo a seguir define o local das notas de fim no documento ativo.

ActiveDocument.Endnotes.Location = wdEndOfSection

Use o método Add para adicionar uma nota de fim à coleção Endnotes. O exemplo a seguir adiciona uma nota de fim imediatamente após a seleção.

Selection.Collapse Direction:=wdCollapseEnd 
ActiveDocument.Endnotes.Add Range:=Selection.Range , _ 
 Text:="The Willow Tree, (Lone Creek Press, 1996)."

Use as notas de fim (Index), onde Index é o número de índice, para retornar um único objeto de nota de fim. O número de índice representa a posição da nota de fim em uma seleção, intervalo ou documento. O exemplo a seguir aplica formatação em vermelho à primeira nota de fim na seleção.

If Selection.Endnotes.Count >= 1 Then 
 Selection.Endnotes(1).Reference.Font.ColorIndex = wdRed 
End If

Confira também

Referência do modelo de objeto do Word

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.