Moving Footnote Text into the Document

Footnotes are used quite often in some types of documents, such as scholarly papers or those where it is important to document supporting information. If you have a footnote whose text you want to move into the main body of the document--and thereby do away with the footnote--then you typically follow these steps:

1. Select all the text in the footnote.
2. Press Ctrl+X to cut the selected text to the Clipboard.
3. Position the insertion pointer before the footnote reference.
4. Press Ctrl+V to paste the text into the document.
5. Delete the footnote reference, thereby removing the footnote.

Doing this once or twice is OK; doing it many times can be a pain. The solution to make the process faster is to use a macro. The following macro essentially automates the above steps:

Sub MoveFootnote()
    If Selection.Footnotes.Count = 1 Then
        Selection.Footnotes(1).Range.Copy
        Selection.Collapse direction:=wdCollapseStart
        Selection.Paste
        Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
        Selection.Delete Unit:=wdCharacter, Count:=1
    End If
End Sub

In order to use the macro, select the footnote reference before you run it. The macro checks to make sure that there is a single footnote reference in the selection. If there is, it copies the footnote text, pastes it in front of the footnote reference, and then deletes the footnote reference. The result is that you move the footnote text into the document at the same point where the footnote reference used to be.