Clase Endnote - nota al final (Word VBA)

La clase Endnote representa una nota al final.

Para usar una variable de clase Endnote, primero debe ser instanciado, por ejemplo

Dim end as Endnote
Set end = ActiveDocument.Range.Endnotes(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase Endnote : Endnotes.Add y Endnotes.Item.

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Endnote en una colección.

Dim end As Endnote
For Each end In ActiveDocument.Range.Endnotes
	
Next end

Delete

Elimina la nota final especificada.

ActiveDocument.Range.Endnotes(1).Delete

Index

Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.

Dim lngIndex As Long
lngIndex = ActiveDocument.Range.Endnotes(1).Index

Range

Devuelve un objeto Range que representa la parte de un documento incluida en el objeto especificado.

Para obtener información acerca de la devolución de un intervalo de un documento o la devolución de un intervalo de formas de una colección de formas, vea el método Range.

With ActiveDocument.Endnotes(1).Range 
 .Delete 
 .Text = "new endnote text" 
End With

Reference

Devuelve un objeto Range que representa una marca de referencia de nota al final.

Set myRange = ActiveDocument.Endnotes(1).Reference 
myRange.Copy