Footnotes.Add method (Word)
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
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.