Как да премахна линията за разделяне на бележка под линия/забележка в края в документ на Word?
Когато вмъквате бележки под линия или бележки в края в документ на Word, ще откриете, че винаги има хоризонтална разделителна линия над текстовете на бележката под линия или бележките в края. Ако искате да се отървете от тези разделителни линии, моля, опитайте методите в тази статия.
Премахване на разделителен ред за бележка под линия/забележка в края в Word
Премахнете разделителния ред за бележка под линия/забележка в края с VBA код
Премахване на разделителен ред за бележка под линия/забележка в края в Word
Можете да премахнете разделителния ред на бележка под линия или бележка в края в Word, както следва.
1. В документа, който ще премахнете неговата бележка под линия или бележки в края, щракнете Гледка > Проект.
2. След това кликнете Препратки > Показване на бележките както е показано на екранната снимка по-долу.
3. Ако във вашия документ има както бележки под линия, така и бележки в края, a Показване на бележките ще се появи диалогов прозорец, моля, изберете желаната опция и след това щракнете върху OK бутон. Тук избирам Вижте бележка под линия област.
Забележка: Ако във вашия документ съществува само бележка под линия или бележка в края, игнорирайте тази стъпка и преминете към стъпка 4.
4. Сега бележки се показва в края на документа, моля изберете Разделител за бележки под линия в Бележки под линия падащ списък, изберете разделителната линия и след това натиснете Изтрий ключ, за да го изтриете. Вижте екранна снимка:
5. Преминете към Оформление на печат изглед на документа.
След това можете да видите, че разделителната линия на бележката под линия е премахната веднага от документа.
Забележка: За да премахнете линията за разделяне на крайната бележка, просто трябва да поставите отметка Вижте бележката в края област в горното Показване на бележките диалогов прозорец и след това изберете Разделител на бележка в края в Бележки падащ списък.
Премахнете разделителните линии за бележка под линия/забележка в края с VBA код
Ако горният метод е неудобен за вас, можете да опитате следните кодове на VBA, за да премахнете бързо всички разделителни линии на бележка под линия или както бележка под линия, така и бележка в края от документа.
1. В документа, който ще премахнете разделителната линия на бележка под линия, натиснете Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. В Microsoft Visual Basic за приложения прозорец, кликнете Поставете > Модули. След това копирайте по-долу VBA кода в прозореца на модула.
VBA код: премахване на разделителния ред на бележка под линия в документа
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 код: премахване на разделителните линии на бележка под линия и бележка в края в документа
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
Най-добрите инструменти за продуктивност в офиса
Kutools за Word - Подобрете своя Word опит с Over 100 Забележителни функции!
🤖 Kutools AI Assistant: Преобразувайте писането си с AI - Генериране на съдържание / Пренаписване на текст / Обобщаване на документи / Запитване за информация въз основа на Документ, всичко това в Word
📘 Владеене на документи: Разделяне на страници / Обединяване на документи / Експортиране на селекция в различни формати (PDF/TXT/DOC/HTML...) / Пакетно конвертиране в PDF / Експортиране на страници като изображения / Отпечатайте няколко файла наведнъж...
✏ Редактиране на съдържанието: Пакетно намиране и замяна в множество файлове / Преоразмеряване на всички снимки / Транспониране на редовете и колоните на таблицата / Преобразуване на таблица в текст...
🧹 Почистване без усилие: Изметете Допълнителни пространства / Прекъсвания на раздели / Всички заглавки / Текстови полета / Хипервръзки / За повече инструменти за премахване се насочете към нашия Премахване на група...
➕ Творчески вложки: Вмъкване Хилядни разделители / Квадратчета / Радио бутони / QR Code / Баркод / Таблица с диагонални линии / Надпис на уравнение / Надпис на изображението / Надпис на таблица / Множество снимки / Открийте повече в Вмъкване на група...
🔍 Прецизни селекции: Точна точка конкретни страници / таблици / форми / заглавни параграфи / Подобрете навигацията с още Изберете функции...
⭐ Звездни подобрения: Навигирайте бързо до всяко място / автоматично вмъкване на повтарящ се текст / безпроблемно превключване между прозорците на документи / 11 Инструменти за конвертиране...