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