Edit

Share via

Footnotes.Add method (Word)

  • Article

Returns a Footnote object that represents a footnote added to a range.

Syntax

expression.Add (Range, Reference, Text)

expression Required. A variable that represents a 'Footnotes' collection.

Parameters

Name Required/Optional Data type Description
Range Required Range object The range marked for the endnote or footnote. This can be a collapsed range.
Reference Optional Variant The text for the custom reference mark. If this argument is omitted, Microsoft Word inserts an automatically-numbered reference mark.
Text Optional Variant The text of the endnote or footnote.

Return value

Footnote

Remarks

To specify a symbol for the Reference argument, use the syntax{FontName CharNum}`. FontName is the name of the font that contains the symbol. Names of decorative fonts appear in the Font box in the Symbol dialog box (Insert menu). CharNum is the sum of 31 and the number corresponding to the position of the symbol you want to insert, counting from left to right in the table of symbols. For example, to specify an omega symbol at position 56 in the table of symbols in the Symbol font, the argument would be "{Symbol 87}".

Example

The following code example adds an automatically-numbered footnote at the end of the selection.

ActiveDocument.Footnotes.Add Range:= Selection.Range , _ 
 Text:= "The Willow Tree, (Lone Creek Press, 1996)."

The following code example adds a footnote that uses a custom symbol for the reference mark.

ActiveDocument.Footnotes.Add Range:= Selection.Range , _ 
 Text:= "More information in the full report.", _ 
 Reference:= "{Symbol -3998}"

See also

Footnotes Collection Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.