KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как подсчитать количество слов на одной странице в документе Word?

АвторСунДата изменения

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

Подсчёт количества слов на текущей странице с помощью ручного выделения

Подсчёт количества слов на текущей странице с помощью VBA


Подсчёт количества слов на текущей странице с помощью ручного выделения

1. Выделите нужный фрагмент документа с помощью курсора, затем нажмите Рецензирование > Статистика.
Параметр «Статистика» на ленте

2. В диалоговом окне Статистика отображается количество слов в выделенном фрагменте документа.
Диалоговое окно «Статистика»

Kutools для Word

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

  • Написание, редактирование, перевод и суммаризация текстов с помощью ИИ
  • Пакетный поиск и замена в документах
  • Объединяйте и разделяйте документы Word легко
  • Пакетное преобразование Word ↔ PDF

Подсчёт количества слов на текущей странице с помощью VBA

В Word нет встроенной функции для подсчёта слов только на текущей странице — за исключением применения кода VBA.

1. Установите курсор на странице, для которой нужно подсчитать слова, и нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. Нажмите Вставка > Модуль, затем скопируйте и вставьте приведённый ниже код в окно Модуль.

VBA: Подсчёт количества слов на текущей странице

Sub GetWordsCount_ActivePage()
'UpdatebyExtendoffice20180829
    Dim xWord As Long
    xWord = ActiveDocument.Bookmarks("\Page").Range.ComputeStatistics(wdStatisticWords)
    MsgBox "The number of words of atcive page: " & xWord, vbInformation, "Kutools for Word"
End

Код VBA, вставленный в окно модуля

3. Нажмите клавишу F5, и появится окно сообщения с количеством слов на текущей странице.
Всплывающее окно сообщения

Просматривайте и редактируйте несколько документов Word и рабочих книг Excel с удобными вкладками — как в Chrome и Edge!

Так же как вы просматриваете несколько веб-страниц в Chrome, Safari и Edge, Office Tab позволяет открывать и управлять несколькими документами Word или рабочими книгами Excel в одном окне Word или Excel. Переключаться между документами или книгами теперь проще простого — достаточно щёлкнуть по нужной вкладке!

Попробуйте Office Tab бесплатно уже сегодня!

Лучшие инструменты для повышения продуктивности в Office

Kutools для Word — раскройте весь потенциал Word с помощью более чем 100 мощных функций!

🤖Функции KUTOOLS AI: AI Ассистент / Ассистент в реальном времени / Супер полировка (сохранить формат) / Супер перевод (сохранить формат) / Искусственный интеллект для редактирования / Проверка с помощью ИИ

📘Мастерство работы с документами: Разделение страниц / Объединение документов / Экспорт выделенного фрагмента в различных форматах (PDF, TXT, DOC, HTML и др.) / Пакетное преобразование в PDF

Редактирование содержимого: Пакетный поиск и замена в нескольких файлах / Изменение размера всех изображений / Транспонировать таблицу строк и столбцов / Преобразовать таблицу в текст

🧹Легкая очистка: удалите лишние пробелы, разрывы разделов, текстовые поля и гиперссылки. Чтобы узнать больше об инструментах удаления, перейдите в группу Удалить

Креативные вставки: вставляйте разделители разрядов, флажки, переключатели, QR-коды, штрихкоды и несколько изображений. Узнайте больше в группе Вставка

🔍Точное выделение: выделяйте определённые страницы, таблицы, фигуры и абзацы заголовков — улучшите навигацию с помощью расширенных функций выделенияfeatures

Звёздные улучшения: Переход к любому месту / Автоматическая вставка повторяющегося текста / Переключение между документами Windows / 11преобразования Инструменты

🌍Поддержка более чем 40 языков: Используйте Kutools на предпочитаемом языке — доступны английский, испанский, немецкий, французский, китайский и ещё более 40 языков!

Kutools for Word вкладки на ленте
 
 

Office Tab– Добавляет вкладки в Office и значительно упрощает вашу работу

  • Включите редактирование и чтение с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в отдельных окнах.
  • Повышает продуктивность на 50 % и экономит сотни кликов мышью каждый день!

✨ Kutools for Office – Одна установка, пять мощных инструментов!

Включает в себя Office Tab Pro·Kutools для Excel·Kutools для Outlook·Kutools для Word·Kutools for PowerPoint

📦 Получите все 5 инструментов в одном пакете | 🔗 Бесшовная интеграция с Microsoft Office | ⚡ Экономия времени и мгновенно повысьте продуктивность

Лучшие инструменты для повышения продуктивности в Office

Kutools для Word– 100+ инструментов для Word