Перейти к содержимому

Как удалить разделительную линию сносок/концевых сносок в документе Word?

Author: Siluvia Last Modified: 2025-08-07

Когда вы вставляете сноски или концевые сноски в документ Word, появляется горизонтальная разделительная линия над текстом сноски или концевой сноски. Если вы хотите удалить эту линию, попробуйте методы, описанные в этой статье.

Удаление разделительной линии сносок/концевых сносок в Word

Удаление разделительной линии сносок/концевых сносок с помощью кода VBA

Удаление разделительной линии сносок/концевых сносок в Word

Вы можете удалить разделительную линию сносок или концевых сносок в Word, выполнив следующие шаги:

  1. В документе, где вы хотите удалить разделительную линию сносок или концевых сносок, нажмите «Вид» > «Черновик».
    Draft button on the View tab on the ribbon
  2. Нажмите «Ссылки» > «Показать сноски».
    Show Notes on the References tab on the ribbon
  3. Если документ содержит как сноски, так и концевые сноски, появится диалоговое окно «Показать сноски». Выберите нужный вид, затем нажмите «ОК». Например, выберите «Просмотр области сносок».
    Show Notes dialog box

    Примечание: Если ваш документ содержит только сноски или только концевые сноски, пропустите этот шаг и перейдите к следующему.

  4. Теперь раздел «Примечания» появится в конце документа. Выберите «Разделитель сносок» из выпадающего списка «Сноски», выделите разделительную линию и нажмите клавишу Удалить.
    The separator line is selected
  5. Переключите документ обратно в режим просмотра «Макет печати».
    The button to shift to the Print Layout view

Теперь разделительная линия была удалена из документа.

The separator line of footnote is removed

Примечание: Чтобы удалить разделительную линию концевых сносок, выберите «Просмотр области концевых сносок» в диалоговом окне «Показать сноски», затем выберите «Разделитель концевых сносок» из выпадающего списка.

Удаление разделительных линий сносок/концевых сносок с помощью кода VBA

Если ручной метод неудобен, вы можете использовать следующий код VBA для быстрого удаления разделительных линий сносок или одновременно сносок и концевых сносок:

  1. В документе Word нажмите Alt + F11, чтобы открыть окно «Microsoft Visual Basic для приложений».
  2. В окне VBA нажмите «Вставить» > «Модуль», а затем вставьте следующий код в модуль.
    Module window opened in the VBA window

    Код VBA: Удаление разделительной линии сносок из документа Word

    Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub
  3. Нажмите F5 для запуска кода. Все разделительные линии сносок будут мгновенно удалены.

Примечание: Используйте следующий код VBA, если вы хотите удалить разделительные линии как сносок, так и концевых сносок.

Код VBA: Удаление разделительных линий сносок и концевых сносок из документа Word

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub

Лучшие инструменты для повышения производительности в Office

Kutools для Word– улучшите свой опыт работы с Word с помощью более чем 100 выдающихся функций!

🤖 Возможности Kutools AI: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка (с сохранением формата) / Супер Перевод (с сохранением формата) / Искусственный интеллект для редактирования / Проверка с помощью ИИ...

📘 Мастерство работы с документами: Разделить страницы / Объединить документы / Экспортировать выделенное в различных форматах (PDF/TXT/DOC/HTML...) / Пакетно преобразовать в PDF...

✏ Редактирование содержимого: Пакетный поиск и замена в нескольких файлах / Изменить размер всех изображений / Транспонировать строки и столбцы таблицы / Преобразовать таблицу в текст...

🧹 Лёгкая очистка: Удалите лишние пробелы / Разрывы разделов / текстовые поля / гиперссылки. Для других инструментов удаления перейдите в группу Удалить...

➕ Творческие вставки: Вставить разделитель разрядов / Флажки / Переключатели / QR-код / Штрихкод / Несколько изображений. Откройте больше возможностей в группе Вставить...

🔍 Точные выделения: Точно определяйте нужные страницы / таблицы / фигуры / абзацы заголовка. Улучшайте навигацию благодаря расширенным функциям Выбрать ...

⭐ Уникальные улучшения: Переходите к любому расположению / Автоматически вставляйте повторяющийся текст / Переключайтесь между окнами документа /11 инструментов преобразования...

🌍 Поддержка более40 языков: Используйте Kutools на удобном вам языке – поддерживаются английский, испанский, немецкий, французский, китайский и ещё более40 языков!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Хотите попробовать эти функции? Скачайте Kutools для Word прямо сейчас! 🚀
 

Лучшие инструменты для повышения производительности в Office

Kutools для Word – 100+ инструментов для Word

Бесплатная загрузка Купить Подробнее о Kutools