4 метода удаления сносок или разделителей концевых сносок в документе Word

В этом пost, мы хотели бы поделиться с вами 4 способами удаления сносок или разделителей концевых сносок в документе Word.

Если вы когда-нибудь вставите сноску или концевую сноску в документ, вы обнаружите, что над текстом всегда есть горизонтальная линия. Этот разделитель четко выделяет сноску или концевую сноску. Тем не менее, некоторые люди могут найти это раздражающим и хотели бы избавиться от него. Эта статья предоставит вам 4 способа сделать это.

Способ 1: удалить разделитель сносок вручную

1. Во-первых, нажмите вкладку «Вид», затем нажмите «Черновик».
2. Затем нажмите «Ссылки», а затем нажмите «Показать заметки» в области «Сноски».
3. Теперь, если ваш документ содержит как обычные, так и концевые сноски, появится всплывающее окно. Выберите для просмотра область сносок или концевых сносок, затем нажмите «ОК». Теперь давайте сначала выберем «Просмотр области сноски».
4. Панель заметок должна открыться в нижней части экрана. Нажмите кнопку раскрывающегося списка, чтобы выбрать «Разделитель сносок».
5. Затем щелкните, чтобы выделить разделитель. Нажмите «Backspace» или «Delete», чтобы удалить разделитель.
6. Затем выберите «Разделитель продолжения сноски» и также удалите его.
7. Когда вы избавитесь от разделителя, останется пустая строка, которую вы не сможете удалить напрямую. Здесь мы придумываем обходной путь. Подождите, пока выбран «Разделитель сносок».
8. Затем перейдите на вкладку «Главная» и нажмите кнопку со стрелкой в ​​​​группе «Абзац», чтобы открыть диалоговое окно с тем же именем.
9. Выберите «Несколько» для «Межстрочный интервал», установите значение «0.06» и нажмите «ОК».
10. Теперь высота пустой строки уменьшена до минимума. Вы можете снова изменить вид на «Макет печати».

Проверьте результат ниже:

Способ 2: удалить разделитель концевых сносок вручную

1. Повторите первые 3 шага в методе 1, но на этот раз выберите «Просмотр области концевой сноски» в поле «Показать примечания».
2. На панели заметок, открытой внизу, выберите «Разделитель концевых сносок» и выберите разделитель. Затем удалите его.
3. Затем выберите «Разделитель продолжения концевой сноски», выберите разделитель и удалите его.
4. Затем снова выберите «Разделитель концевых сносок», нажав кнопку раскрывающегося списка.
5. И повторите с шага 8 по 10 в методе 1.

Вот результат:

Способ 3: удалить разделитель сносок, запустив макрос

1. Для начала нажмите «Alt + F11», чтобы вызвать редактор VBA в Word.
2. Затем нажмите «Обычный», затем вкладку «Вставить».
3. Затем выберите «Модуль».
4. Затем дважды щелкните, чтобы открыть его, и вставьте туда макрос:

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

5. Нажмите «Выполнить».

Макрос должен автоматически удалить все разделители сносок, а также свести к минимуму оставшуюся пустую строку.

Метод 4: удалить разделитель концевых сносок, запустив макрос

Выполните точные шаги в способе 3, чтобы установить и запустить макрос. Только замените коды на эти:

Sub DeleteTheEndnoteSeparator()

  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 = wdSeekEndnotes
  Else
    ActiveWindow.View.SplitSpecial = wdPaneEndnotes
  End If
 
  '  Delete the endnote separator.
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace
 
  '  Eliminate the blank line after deleting the endnote separator.
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
 
  '  Delete the endnote continuation separator. 
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace

  '  Eliminate the blank line after deleting the endnote 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

Сохраните ваши документы

Ни одно программное обеспечение не является надежным, и это в полной мере относится к Word. Как правило, это был такой полезный инструмент для обработки текстов. Тем не менее, есть некоторое время простоя, когда Word рушится, оставляя ваш документ поврежденным. Что еще хуже, этот документ - единственная копия, которая у вас есть. Это так грустно. Но, если вы выберете квалифицированную утилиту для документ по ремонту сразу, вы можете получить совершенно другой результат.

Об авторе:

Вера Чен — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая ремонт xls и pdf ремонт программных продуктов. Для получения дополнительной информации посетите www.datanumen.com