Delete Footnote Separators In Word 2010

Discussion in 'Software' started by Maciej, May 15, 2017.

  1. Maciej

    Maciej

    Joined:
    May 15, 2017
    Messages:
    2
    Likes Received:
    1
    Hey,

    I insert a lot of footnotes in Word, and I don't want the separetors. But I find that I just can't delet the footnote separators in it. It's annoying. Is there a way to quickly delete them ? Thanks in advance.
     
    Maciej, May 15, 2017
    #1
    1. Advertisements

  2. Maciej

    Wolfie

    Joined:
    Apr 22, 2017
    Messages:
    1,427
    Likes Received:
    166
    Wolfie, May 15, 2017
    #2
    1. Advertisements

  3. Maciej

    Kreymily

    Joined:
    May 17, 2017
    Messages:
    1
    Likes Received:
    3
    Hi, Maciej,

    As the way Wolfie give above, you can delete the footnote separators, but there will be a blank line left which you can't delete directly.

    If you also want to delete the blank line, after delete the footnote separators, you need to choose “Multiple” for “Line spacing”, then set the value at “0.06”in "Paragraph" group.

    You can also use VBA to do that for you, below is the macro:

    Code (Text):
    Sub DeleteTheFootnoteSeparator()

      If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
      Else
        ActiveWindow.View.Type = wdNormalView
      End If
     
      If ActiveWindow.ActivePane.View.Type = wdPrintView Or ActiveWindow.ActivePane.View.Type = wdWebView Or _
        ActiveWindow.ActivePane.View.Type = wdPrintPreview Then
        ActiveWindow.View.SeekView = wdSeekFootnotes
      Else
        ActiveWindow.View.SplitSpecial = wdPaneFootnotes
      End If
     
      '  Delete the footnote separator.
      ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
      Selection.MoveRight Unit:=wdCharacter, Count:=1
      Selection.TypeBackspace
      Selection.TypeBackspace
     
      '  Eliminate the blank line after deleting the footnote separator.
      With Selection.ParagraphFormat
        .LineSpacingRule = wdLineSpaceMultiple
        .LineSpacing = LinesToPoints(0.06)
      End With

      '  Delete the footnote continuation separator.
      ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
      Selection.MoveRight Unit:=wdCharacter, Count:=1
      Selection.TypeBackspace
      Selection.TypeBackspace

      '  Eliminate the blank line after deleting the footnote continuation separator.
      With Selection.ParagraphFormat
        .LineSpacingRule = wdLineSpaceMultiple
        .LineSpacing = LinesToPoints(0.06)
      End With
     
      If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdPrintView
      Else
        ActiveWindow.View.Type = wdPrintView
      End If
    End Sub
    More details at:

    https://www.datanumen.com/blogs/4-methods-remove-footnote-endnote-separator-word-document/

    Good luck.
     
    Kreymily, May 18, 2017
    #3
    Maciej, Trouble and Wolfie like this.
  4. Maciej

    Jscott09

    Joined:
    May 15, 2017
    Messages:
    6
    Likes Received:
    0
    Wow! Great method learned from the upstairs reply.
     
    Jscott09, May 24, 2017
    #4
  5. Maciej

    Maciej

    Joined:
    May 15, 2017
    Messages:
    2
    Likes Received:
    1
    Forget to say Thanks! It's amazing!
     
    Maciej, Jun 6, 2017
    #5
    Wolfie likes this.
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.