Classe Endnote - note de fin (Word VBA)

La classe Endnote représente une note de fin. Pour utiliser une variable de classe Endnote, elle doit d'abord être instanciée, par exemple


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

For Each

Voici un exemple de traitement des éléments Endnote dans une collection


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

Delete

Supprime la note de fin spécifiée.


ActiveDocument.Range.Endnotes(1).Delete

Index

Renvoie un type long qui représente la position d'un élément dans une collection.


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

Range

Renvoie un objet Range qui représente la partie d’un document contenue dans l’objet spécifié.

Pour plus d'informations sur le renvoi d'une plage à partir d'un document ou le renvoi d'une plage de formes à partir d'une collection de formes, voir la méthode Range.


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

Reference

Renvoie un objet Range qui représente une marque d'appel de note de fin.


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