В этой статье есть 4 способа быстро удалить все сноски или концевые сноски, которые есть в документе Word.
В целом, концевые сноски и сноски — это тексты в документе, где идут пояснения и комментарии. Тем не менее, иногда, когда вы наследуете документ от других, такая информация может оказаться для вас бесполезной. Поэтому вам придется их удалить. Не удаляя их по одному, вот 4 быстрых способа, которые позволят вам очистить их раз и навсегда.
Способ 1: используйте окно «Стили»
- Прежде всего, нажмите вкладку «Главная».
- Затем нажмите кнопку со стрелкой вниз в группе «Стили».
- Затем в открытом окне «Стили» найдите и поместите курсор на «Ссылка на сноску» или «Ссылка на концевую сноску».
- И нажмите кнопку с перевернутым треугольником.
- Теперь в раскрывающемся меню нажмите «Выбрать все экземпляры XX». «XX» здесь относится к количеству сносок или концевых сносок, которые у вас есть. Теперь все сноски или концевые сноски выделены.
- Наконец, нажмите «Удалить», и все они исчезнут через секунду.
Однако иногда на шаге 2 вы можете не найти ни «Ссылку на сноску», ни «Ссылку на концевую сноску». Вот шаги, которые вы можете предпринять:
- Во-первых, нажмите «Параметры» в правой части окна «Стили».
- Затем в диалоговом окне «Параметры панели стилей» выберите «Все стили» для «Выбрать стили для отображения».
- Затем нажмите «ОК».
- И теперь вы можете найти как «Справочник по сноске», так и «Справочник по концевой сноске».
- Повторите шаг 4 выше.
- Наконец, нажмите «Выбрать все», и вы увидите, что они сейчас выбраны.
Способ 2: используйте функцию «Найти и заменить»
- Сначала также нажмите «Главная» таблица.
- Затем на этот раз в группе «Редактирование» выберите «Заменить».
- Затем в диалоговом окне «Найти и заменить» поместите курсор в текстовое поле «Найти».
- И нажмите кнопку «Дополнительно», чтобы расширить дополнительные параметры.
- Затем нажмите «Особые» внизу.
- Затем выберите «Знак концевой сноски» или «Знак сноски».
- Если вы выберете «Знак концевой сноски», в текстовом поле «Найти что» вы увидите «^e». Если вы выберете «Знак сноски», вы, скорее всего, увидите «^f».
- Теперь оставьте текстовое поле «Заменить на» пустым.
- Наконец, нажмите «Заменить все», чтобы удалить все. Или нажмите «Заменить», чтобы просмотреть их один за другим и решить, удалять их или нет.
Здесь вы должны понимать, что если некоторые сноски или концевые сноски содержат пользовательские метки, их нельзя очистить, например, как показано ниже:
Способ 3: Запись макроса
Например, если мы хотим избавиться от всех сносок, мы можем записать макрос для метода 2 и взамен получим коды. И затем вы можете назначить кнопку или клавиатуру для макроса, чтобы использовать его позже. О том, как записать макрос, читайте в этой статье: Как удалить форматирование вставленных текстов с помощью макроса и VBA в вашем Word
Для удаления сносок используются следующие коды:
Sub DeleteFootnotes() Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "^f" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll End Sub
Кстати, чтобы удалить концевые сноски, вам просто нужно изменить «^f» на «^e» в строке кода «.Текст = «^f»».
Способ 4: используйте коды VBA
Если вы предпочитаете еще более быстрый способ, вам может помочь макрос. Как показано в методе 2, некоторые из настраиваемых концевых сносок или сносок не могут быть удалены. Но с помощью макроса с этим можно легко справиться.
- К start с, нажмите «Alt + F11», чтобы открыть редактор VBA.
- Затем нажмите «Вставить», чтобы вставить новый «Модуль».
- Затем дважды щелкните, чтобы открыть модуль. Теперь, если вы хотите удалить все концевые сноски, вставьте следующие коды:
Sub DeleteAllEndnotes()
Dim objEndnote As Endnote
For Each objEndnote In ActiveDocument.Endnotes
objEndnote.Delete
Next
End Sub
А чтобы удалить все сноски, вставьте вместо них эти коды:
Sub DeleteAllfootnotes() Dim objFootnote As Footnote For Each objFootnote In ActiveDocument.Footnotes objFootnote.Delete Next End Sub
- Наконец, нажмите «Выполнить».
Сравнение 4 методов
| методы | Преимущества | Недостатки |
| Способ 1: используйте окно «Стили» | 1. Простые шаги
2. Можно удалить сразу все концевые сноски или сноски, включая пользовательские метки. |
1. Вы должны повторять операцию каждый раз, когда у вас есть новый документ.
2. Он удаляет все концевые сноски или сноски, и вы не можете сохранить некоторые из них, если хотите. |
| Способ 2: Используйте функцию «Найти и заменить» и Способ 3: Запись макроса | 1. Вы можете либо удалить их все, либо перейти по одному, чтобы принять решение.
2. Вы можете записать макрос для последующего использования. |
1. Сравнительно больше шагов
2. Невозможно удалить пользовательские метки |
| Способ 4: используйте коды VBA | 1. Простые шаги
2. Можно удалить сразу все концевые сноски или сноски, включая пользовательские метки. |
1. Подходит людям, знакомым с макросъемкой.
2. Он удаляет все концевые сноски или сноски, и вы не можете сохранить некоторые из них, если хотите. |
Исправить поврежденные файлы
Как правило, с таким количеством функций мы можем многого добиться в Word. Тем не менее, он может быть подвержен ошибкам и повреждениям, оставляя поврежденные файлы Word. Поэтому в это время вам непременно придется получить Средство исправления ошибок Word чтобы помочь себе получить ценные данные.
Об авторе:
Вера Чен — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая Инструмент восстановления файлов Excel и pdf ремонт программных продуктов. Для получения дополнительной информации посетите www.datanumen.com