Class Footnote (Word VBA)

The class Footnote represents a footnote positioned at the bottom of the page or beneath text. The Footnote object is a member of the Footnotes collection. The Footnotes collection represents the footnotes in a selection, range, or document. To use a Footnote class variable it first needs to be instantiated, for example


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

For Each

Here is an example of processing the Footnote items in a collection.


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

Delete

Deletes the specified footnote.


ActiveDocument.Range.Footnotes(1).Delete

Index

Returns a Long that represents the position of an item in a collection.


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

Range

Returns a Range object that represents the portion of a document that's contained within the footnote.


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

Reference

Returns a Range object that represents a footnote reference mark.


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