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

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

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

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

  1. Выберите список, который хотите заморозить.

  2. Нажмите Ctrl + C, чтобы скопировать текст в буфер обмена. Список все равно должен быть выбран.

  3. Откройте вкладку «Главная» на ленте.

  4. Щелкните стрелку вниз под инструментом «Вставить» в группе «Буфер обмена» на ленте, затем выберите «Специальная вставка». Word отображает диалоговое окно Специальная вставка. (См. Рис. 1.)

  5. Выберите «Неформатированный текст» в качестве типа вставки.

  6. Щелкните ОК.

Эти действия заменяют существующий динамический список собственным текстом, и Word автоматически преобразует автоматическую нумерацию в текст.

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

Более простой подход — использовать макрос, который сделает всю работу за вас. VBA включает специальный метод, который устраняет уже отмеченные недостатки и делает преобразование намного более чистым. Никакое другое форматирование, кроме номеров автоматических списков, не затрагивается. Ниже приведен макрос ListPlain:

Sub ListPlain()

Dim lp As Paragraph

For Each lp In ActiveDocument.ListParagraphs         lp.Range.ListFormat.ConvertNumbersToText     Next lp End Sub

Обратите внимание, насколько короток макрос. Он также выполняется очень быстро и влияет на всю нумерацию во всем документе. Это затрагивает любые нумерованные списки, основанные на автоматической нумерации Word, как и любые поля LISTNUM.

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

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

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

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

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

link: / word-Converting_Lists_to_Text [Преобразование списков в текст].