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

  1. Нажмите Ctrl + H, чтобы открыть вкладку «Заменить» в диалоговом окне «Найти и заменить». (См. Рис. 1.)

  2. В поле «Найти» введите ^ f. Это означает, что вы хотите найти сноски.

  3. Убедитесь, что поле «Заменить на» пусто.

  4. Нажмите «Заменить все».

  5. Закройте диалоговое окно «Найти и заменить».

Этот подход работает, потому что когда вы удаляете метки сносок, сноска, связанная с этой меткой, также автоматически удаляется.

Если вы обнаружите, что избавляетесь от сносок в большом количестве документов, вы можете создать макрос, который сделает эту работу за вас. Затем этот макрос может быть назначен для link: / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Панель быстрого доступа] или для сочетания клавиш. Следующий макрос удалит все сноски в документе:

Sub DelFoots()

Dim fn As Footnote

For Each fn In ActiveDocument.Footnotes         fn.Delete     Next  End Sub

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (11407) применим к Microsoft Word 2007, 2010, 2013 и 2016. Вы можете найти версию этого совета для старого интерфейса меню Word здесь:

link: / word-Deleting_All_Footnotes [Удаление всех сносок].