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)
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