Compartir a través de


Objeto Endnotes (Word)

Una colección de objetos Endnote que representa todas las notas al final de una selección, intervalo o documento.

Comentarios

Utilice la propiedad Endnotes para devolver la colección Endnotes. En el siguiente ejemplo se establece la ubicación de las notas al final del documento activo.

ActiveDocument.Endnotes.Location = wdEndOfSection

Utilice el método Add para agregar una nota al final a la colección Endnotes. En el siguiente ejemplo se agrega una nota al final inmediatamente después de la selección.

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

Utilice Endnotes (Index), donde Index es el número de índice, para devolver un solo objeto Endnote. El número de índice representa la posición de la nota al final en una selección, intervalo o documento. En el siguiente ejemplo se aplica formato rojo a la primera nota al final de la selección.

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

Vea también

Referencia de modelos de objetos de Word

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.