В этой статье мы намерены показать вам 2 способа преобразования автоматической нумерации в обычный текст в документе Word.
Как правило, мы много выигрываем от функции автонумерации в Word. Это избавляет нас от многих проблем при перечислении элементов и организации абзацев. Однако вот в чем подвох. Документ обычно требует пересмотра более одного раза. И это в процессе добавления и удаления текстов, которые влияют на числа. Поэтому нам нужно преобразовать эти «динамические» числа в обычные тексты. Таким образом, мы можем защитить форматирование нашего документа.
Ниже приведены наши 2 метода, которые вам понадобятся. И прежде чем попробовать, мы настоятельно рекомендуем сначала сделать резервную копию вашего файла. Если вам нужно автоматически пронумеровать текст после преобразования его в обычный текст, вы всегда можете прибегнуть к резервной копии.
Способ 1: оставить только текст
- В первую очередь выделите текст, содержащий автоматическую нумерацию.
- Затем щелкните правой кнопкой мыши.
- Затем выберите «Копировать» в меню списка.

- Теперь нажмите «Удалить», чтобы удалить исходный текст.
- И снова щелкните правой кнопкой мыши по области.
- На этот раз выберите «Сохранить только текст» в разделе «Параметры вставки».
Теперь вы успешно преобразовали автоматическую нумерацию в статическую. Ниже приведен пример:
Вы уже могли заметить, что форматирование документа на самом деле немного меняется. Если ваш документ содержит всего несколько чисел и не требует стандартов форматирования, вы можете смело использовать этот метод. Однако если в вашем документе есть многоуровневые списки, вам придется повторить эти операции несколько раз.
Собственно, поэтому у нас второй метод, т.е. использование кодов VBA.
Способ 2: используйте коды VBA
- Во-первых, убедитесь, что на ленте доступна вкладка «Разработчик». Если нет, пожалуйста, обратитесь к нашей предыдущей статье: Как вставить фоновую музыку в документ Word
- Во-вторых, нажмите вкладку «Разработчик».
- В-третьих, нажмите «Visual Basic» в группе «Код».
- Теперь вы открыли редактор VBA. В левой колонке найдите название проекта вашего документа. Затем дважды щелкните «Этот документ», чтобы открыть область редактирования с правой стороны.
- Теперь давайте рассмотрим 2 разных случая. Во-первых, если вы хотите преобразовать только выборку автоматической нумерации, вам следует скопировать и вставить следующие коды:
Sub ConvertSelectAutoNumberToText() If ActiveDocument.Lists.Count > 0 Then Selection.Range.ListFormat.ConvertNumbersToText Else End If End Sub
Однако, если вы прибили окончательный вариант всего документа, вам следует воспользоваться следующими, чтобы преобразовать всю автоматическую нумерацию в обычный текст:
Sub ConvertAllAutoNumberToText() If ActiveDocument.Lists.Count > 0 Then Dim lisAutoNumList As List For Each lisAutoNumList In ActiveDocument.Lists lisAutoNumlist.ConvertNumbersToText Next Else End If End Sub
- Наконец, нажмите «Выполнить», чтобы выполнить задание.
Вы можете видеть, что когда вы используете коды VBA, чтобы избавиться от «динамических» чисел, вы можете очень хорошо сохранить форматирование документа.
Подумайте о резервных копиях
Как всегда, мы уделяем большое внимание созданию резервных копий ваших файлов. Поскольку они играют жизненно важную роль, когда ваши файлы повреждаются, время, которое вы тратите на это, может окупиться. Один из примеров: при использовании инструмент для исправления ошибок docx, вы всегда можете получить самые свежие данные, которые могут значительно сократить время простоя.
Об авторе:
Вера Чен — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая Исправление ошибки данных xlsx и pdf ремонт программных продуктов. Для получения дополнительной информации посетите www.datanumen.com





