How to add .5" indent at the start of footnote before the number

doctorduncan · #1 04-30-2019, 01:28 PM

This should not be this hard. I want to change the style of footnotes to indent the first line .5", just as a paragraph would have. I can see the footnote style contents, I can click Modify style and I can click Format at the bottom of the dialog page that comes up. I can't seem to get Word 2016 to allow me to make the actual change. I haven't figured out exactly what to type in for this indent but even if I could, I can't seem to type anything. How do I get the format window to allow me to add the code to indent the whole first line? Thanks.

KDuncan

macropod · #2 04-30-2019, 02:42 PM

It's not clear which Style you're trying to modify. You can apply the indent to the Footnote Text Style, which is as it should be, but not to the Footnote Reference Style - as that's only a character Style. A simple way of doing that is to copy a footnote's terminating paragraph break & paste it into the document body, apply the desired paragraph formatting, then right-click on it & choose Styles>Update Footnote Text to Match Selection.

Stefan Blom · #3 05-01-2019, 12:00 PM

To set a first line indent for each footnote paragraph, you can modify the Footnote Text paragraph style, as Paul suggested.

Note, however, that you can't change the indentation around the footnote reference number, if that is what you are trying to do. Word will always add a space after the number (and nothing else). This is very different from paragraph numbering in Word.

If you want a hanging indent for each new footnote text paragraph that you add, you can make use of macros. The following two macros remove the superscript from the footnote number and adds a tab stop. Use it after you have set a hanging indent for the Footnote Text style.

Code:

Sub InsertFootnote()
'Macro originally created by Dave Rado
'https://wordmvp.com/FAQs/MacrosVBA/UnSuperscptFnotes.htm
'Modified by Stefan Blom, MVP, May 2019
ActiveDocument.Footnotes.Add Range:=Selection.Range
With Selection
    .Paragraphs(1).Range.Font.Reset
    .Paragraphs(1).Range.Characters(2) = ""
    .InsertAfter "." & vbTab
    .Collapse wdCollapseEnd
End With
ActiveWindow.ScrollIntoView Selection.Range
End Sub
 
Sub InsertFootnoteNow()
'Macro originally created by Dave Rado
'https://wordmvp.com/FAQs/MacrosVBA/UnSuperscptFnotes.htm
'Modified by Stefan Blom, MVP, May 2019
ActiveDocument.Footnotes.Add Range:=Selection.Range
With Selection
    .Paragraphs(1).Range.Font.Reset
    .Paragraphs(1).Range.Characters(2) = ""
    .InsertAfter "." & vbTab
    .Collapse wdCollapseEnd
End With
ActiveWindow.ScrollIntoView Selection.Range
End Sub

macropod · #4 05-01-2019, 12:11 PM

Quote:

Originally Posted by Stefan Blom

The following two macros remove the superscript from the footnote number and adds a tab stop.

It also adds a period after the footnote number. Neither may be desirable, in which case, change:

Code:

With Selection
    .Paragraphs(1).Range.Font.Reset
    .Paragraphs(1).Range.Characters(2) = ""
    .InsertAfter "." & vbTab
    .Collapse wdCollapseEnd
End With

to:

Code:

With Selection
  .Start = .Start - 1
  .Text = vbTab
  .Collapse wdCollapseEnd
End With

Stefan Blom · #5 05-01-2019, 01:32 PM

Yes, I believe we need the original poster to elaborate on the specific requirements.
:-)

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Space between footnote number and footnote text	Sabya	Word	6	07-29-2018 02:30 PM
No space between footnote number and footnote	cgp1689	Word	6	10-13-2015 08:24 AM
Heading's Footnote's number is displayed in TOC. How to remove the number in TOC?	Orehrepus	Word	1	07-13-2014 12:51 PM
Mailing: how to make the "page number" in Word is the same as "row number" in excel w	Jamal NUMAN	Word	1	09-03-2011 11:37 AM
Why the "decrease indent" doesn't affect the selected text to move????	Jamal NUMAN	Word	0	07-12-2011 04:10 PM