Klasse Footnote - Fußnote (Word VBA)

Die Klasse Footnote stellt eine Fußnote dar, die sich am Ende der Seite oder unterhalb des Texts befindet. Um eine Footnote -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim ftn as Footnote
Set ftn = ActiveDocument.Range.Footnotes(Index:=1)

For Each

Hier ist ein Beispiel für die Verarbeitung der Footnote -Elemente in einer Sammlung

Dim ftn As Footnote
For Each ftn In ActiveDocument.Range.Footnotes
	
Next ftn

Delete

Löscht die angegebene Fußnote.

ActiveDocument.Range.Footnotes(1).Delete

Index

Gibt einen Wert vom Typ Long zurück, der die Position eines Elements in einer Auflistung darstellt.

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

Range

Gibt ein Range -Objekt zurück, das den Teil eines Dokuments darstellt, der in der Fußnote enthalten ist.

Dim rngRange As Range
Set rngRange = ActiveDocument.Range.Footnotes(1).Range

Reference

Gibt ein Range -Objekt zurück, das ein Fußnotenreferenz Zeichen darstellt.

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