How to Place Parenthetical Text into a Word 2016 Footnote - dummies

How to Place Parenthetical Text into a Word 2016 Footnote

By Dan Gookin

One of the sins you can commit in writing a term paper or thesis is placing too many parenthetical notes on a page. Many professors appreciate it when you instead use footnotes. You’ll also appreciate the parenthetical_to_footnote macro, which automates the process.

Keystrokes were used to record this macro, but the insertion pointer must be precisely positioned for it to work: Click the insertion pointer before the parenthetical sentence, just before the period where you want the footnote to appear. The figure illustrates the positioning and the result after running the macro.

word-pros-footnote
Running the parenthetical_to-footnote macro.

Sub parenthetical_to_footnote()

'

' parenthetical_to_footnote Macro

' Convert parenthetical text following the cursor into a footnote

'

Selection.Extend

Selection.Extend Character:="("

Selection.EscapeKey

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.Extend

Selection.Extend Character:=")"

Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend

Selection.Cut

Selection.MoveRight Unit:=wdCharacter, Count:=1

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeText Text:="."

Selection.MoveLeft Unit:=wdCharacter, Count:=1

With Selection

With .FootnoteOptions

.Location = wdBottomOfPage

.NumberingRule = wdRestartContinuous

.StartingNumber = 1

.NumberStyle = wdNoteNumberStyleArabic

.LayoutColumns = 0

End With

.Footnotes.Add Range:=Selection.Range, Reference:=""

End With

Selection.Paste

End Sub

The following keystrokes were used to create this macro. They’re pretty complex:

  1. Press F8 and then the ( (left parenthesis) character.
    The F8 command enters extended selection mode. When you press a key, such as the ( key, text is selected up to and including that character.
  2. Esc,
    Selection is canceled, and the → key moves the insertion pointer to the start of the parenthetical text.
  3. F8, )
    Text is selected up to and including the ) character.

  4. The ) character is removed from the selection.
  5. Ctrl+X
    The parenthetical text is cut. The next few keystrokes remove the parenthesis and position the insertion pointer for the footnote.
  6. Backspace, Backspace, Backspace, Backspace, . (period),
  7. Click the References tab and, in the Footnotes group, click the Insert Footnote button.
  8. Ctrl+V
    The text is pasted into the footnote.