How to Split a Word Document by Word Count (3 Easy Ways)

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

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

• Разделение документа Word вручную с использованием статистики слов
• Автоматическое разделение документа Word по количеству слов с помощью VBA
• Прямое разделение документа Word по количеству слов с помощью Kutools
• Какой метод выбрать?
• Заключение

Разделение документа Word вручную с использованием статистики слов

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

Office Tab

Вкладки для навигации в Word, Excel, PowerPoint и других приложениях — как в веб-браузере: удобно переключайтесь между документами в одном окне.

Бесплатная загрузкаПодробнее

1. Откройте документ Word, который нужно разделить.
2. Взгляните на строку состояния в нижней части окна Word, чтобы увидеть текущее количество слов.

   

   💡 Совет:

   Если количество слов не отображается в строке состояния, щёлкните по ней правой кнопкой мыши и включите «Статистику слов».

3. Укажите, сколько слов должно содержаться в каждом разделённом документе.
4. Вручную выделите первую часть документа — во время выделения Word отобразит количество выбранных слов в строке состояния.

   

   💡 Совет:

   Поместите курсор в начало участка, который нужно выделить, затем удерживайте Shift и щёлкните в том месте, где должен завершиться выделенный фрагмент. Word автоматически обновит количество выделенных слов на строке состояния. Если результат вас не устраивает, снова удерживайте Shift и щёлкните чуть раньше или позже текущей позиции, чтобы скорректировать выделение.

5. Нажмите Ctrl + X, чтобы вырезать выделенное содержимое, или Ctrl + C, чтобы скопировать его.
6. Создайте новый документ Word, затем нажмите Ctrl + V, чтобы вставить содержимое.
7. Сохраните новый документ.
8. Повторите ту же процедуру для всех остальных частей исходного документа.

Автоматическое разделение документа Word по количеству слов с помощью VBA

Если вы регулярно работаете с объёмными документами или вам нужно автоматически создавать несколько файлов на основе фиксированного количества слов, VBA предлагает практичное решение для автоматизации. Приведённый ниже макрос создаёт новый документ каждый раз, как только достигается заданный лимит слов.

1. Откройте документ Word, который нужно разделить.
2. Нажмите Alt + F11, чтобы открыть редактор VBA.
3. В редакторе VBA выберите Вставка > Модуль.
4. Скопируйте и вставьте следующий код VBA в модуль:

   Sub SplitDocumentByWordCount()
   
       Dim SourceDoc As Document
       Dim NewDoc As Document
       Dim Para As Paragraph
       Dim CurrentRange As Range
       Dim OutputFolder As String
       Dim WordLimit As Long
       Dim CurrentWords As Long
       Dim PartNumber As Long
   
       Set SourceDoc = ActiveDocument
   
       WordLimit = 2000
       OutputFolder = SourceDoc.Path & "\Split_Documents\"
   
       If Dir(OutputFolder, vbDirectory) = "" Then
           MkDir OutputFolder
       End If
   
       Set NewDoc = Documents.Add
       CurrentWords = 0
       PartNumber = 1
   
       For Each Para In SourceDoc.Paragraphs
   
           Set CurrentRange = Para.Range
   
           NewDoc.Range.InsertAfter CurrentRange.Text
   
           CurrentWords = CurrentWords + _
           CurrentRange.ComputeStatistics(wdStatisticWords)
   
           If CurrentWords >= WordLimit Then
   
               NewDoc.SaveAs2 _
               FileName:=OutputFolder & "Part_" & PartNumber & ".docx", _
               FileFormat:=wdFormatXMLDocument
   
               NewDoc.Close
   
               PartNumber = PartNumber + 1
               CurrentWords = 0
   
               Set NewDoc = Documents.Add
   
           End If
   
       Next Para
   
       If NewDoc.Range.ComputeStatistics(wdStatisticWords) > 0 Then
   
           NewDoc.SaveAs2 _
           FileName:=OutputFolder & "Part_" & PartNumber & ".docx", _
           FileFormat:=wdFormatXMLDocument
   
           NewDoc.Close
   
       End If
   
       MsgBox "The document has been split successfully."
   
   End Sub

   💡 Совет: Измените значение WordLimit = 2000 на желаемый лимит количества слов.

5. Нажмите F5, чтобы запустить макрос.
6. Разделённые документы автоматически сохранятся в папке с названием Split_Documents, расположенной в том же каталоге, что и исходный файл.

Прямое разделение документа Word по количеству слов с помощью Kutools для Word

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

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

1. Откройте документ Word, который нужно разделить.
2. Выберите KUTOOLS PLUS > Разделить.
3. В диалоговом окне Разделить документ выберите По количеству слов в поле Разделить по раскрывающемся списке.
4. Укажите желаемый интервал между словами.
5. Если вы не хотите, чтобы абзацы разделялись между документами, отметьте Не разделять абзацы.
6. При необходимости укажите префикс для имени файла.
7. Выберите папку для сохранения разделённых документов.
8. Нажмите Разделить.

   

Отдельные документы Word будут автоматически созданы на основе заданного количества слов.

Какой метод выбрать?

Заключение

Если документ нужно разделить всего на несколько частей и требуется полный контроль над форматированием и точками разделения, ручной метод обычно оказывается достаточным. Для автоматического разделения больших документов на множество файлов VBA может сэкономить время, но не всегда надёжно сохраняет форматирование. Если же вы ищете более простой способ разделить документ по количеству слов с сохранением форматирования, Kutools для Word предлагает прямую функцию «Разделение по количеству слов» с интуитивно понятным графическим интерфейсом, что делает его наиболее удобным решением для большинства пользователей.

Надеемся, это руководство оказалось полезным! Если вы хотите узнать больше советов и практических решений для Word, пожалуйста, нажмите здесь, чтобы ознакомиться со всей нашей коллекцией обучающих материалов по Word.