Classe Endnote - nota de fim (Word VBA)

A classe Endnote representa uma nota de fim. O objeto Endnote é um membro da coleção Endnotes, que representa as notas de fim em uma seleção, intervalo ou documento. Para usar uma variável de classe Endnote, ela primeiro precisa ser instanciada por exemplo

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

For Each

Aqui está um exemplo de processamento dos itens Endnote em uma coleção.

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

Delete

Exclui a nota de fim especificada.

ActiveDocument.Range.Endnotes(1).Delete

Index

Retorna um Long que representa a posição de um item em uma coleção. Somente leitura.

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

Range

Retorna um objeto Range que representa a parte de um documento que está contida no objeto especificado.

Para obter informações sobre como retornar um intervalo de um documento ou um intervalo de formas de uma coleção de formas, consulte o método Range.

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

Reference

Retorna um objeto Range que representa uma marca de referência de nota de fim.

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