Перейти к содержимому

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

Author: Xiaoyang Last Modified: 2025-08-07

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

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

Подсчет количества встроенных изображений с помощью функции «Найти и заменить»

Подсчет количества встроенных изображений в нескольких документах с использованием Kutools для Word

Подсчет количества как встроенных изображений, так и плавающих фигур с помощью кода VBA

Подсчет количества встроенных изображений с использованием функции «Найти и заменить»

Функция «Найти и заменить» в Word позволяет быстро подсчитать количество встроенных изображений. Следуйте этим шагам:

  1. Нажмите Главная > Найти > Расширенный поиск.

    Advanced Find option on the Ribbon

  2. В диалоговом окне «Найти и заменить», на вкладке «Найти», введите ^g в текстовое поле «Что искать». Затем выберите Основной документ из выпадающего списка «Искать в».

    Find and Replace dialog with '^g' in the Find what text box and 'Main Document' selected from the Find In drop down list

  3. Количество встроенных изображений в документе будет отображено в нижней части диалогового окна.

    Find and Replace dialog displaying the count of items matching the criteria

Office Tab: Добавляет интерфейсы с вкладками в Word, Excel, PowerPoint...
Navigate through documents using Office Tab
Улучшите свой рабочий процесс прямо сейчас.Узнать больше об Office Tab Бесплатная загрузка

Подсчет количества встроенных изображений в нескольких документах с использованием Kutools для Word

Kutools для Word предоставляет быстрый и эффективный способ подсчета встроенных изображений в нескольких документах. Этот инструмент упрощает процесс, экономя время и усилия за счет автоматизации подсчета местозаполнителей изображений (обозначаемых ^g) в выбранных файлах.

Kutools для Word,оснащённый ИИ 🤖, предлагает более 100 удобных функций для упрощения ваших задач.
  1. На вкладке Kutools выберите Пакетная замена.

    Batch Replacement option on the Kutools tab in Word ribbon

  2. В Пакетный поиск и замена диалоговом окне настройте параметры следующим образом:
    1. Нажмите Добавить строку, чтобы создать правило для поиска встроенных изображений.
    2. В поле Найти добавленной строки введите ^g (что указывает на местозаполнители встроенных изображений).
    3. Нажмите кнопку Добавить и выберите Добавить файлы или Добавить папку, чтобы импортировать документы, где вы хотите подсчитать встроенные изображения.
    4. Нажмите Найти, чтобы выполнить операцию поиска и подсчета во всех выбранных документах.

      Batch Find and Replace dialog with ^g in the Find field

  3. Диалоговое окно «Пакетный поиск и замена» переключится на вкладку Предварительный просмотр результатов, где вы сможете просмотреть общее количество встроенных изображений. После проверки нажмите Закрыть.

    Batch Find and Replace dialog with preview results

Вот и все! Теперь количество встроенных изображений в каждом выбранном документе подсчитано и отображено сразу.

Kutools для Word — это идеальный надстройка для Word, которая упрощает вашу работу и повышает навыки обработки документов. Получите сейчас!

Подсчет количества как встроенных изображений, так и плавающих фигур с помощью кода VBA

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

  1. Удерживайте клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
  2. Нажмите Вставить > МодульСкопируйте и вставьте следующий код в пустой модуль: 
    Sub CountImagesInDoc()
    Dim xInlines As Long
    Dim xFloaters As Long
    Dim sh As Shape
    Dim tbxs As Long
    Dim msg As String
    With ActiveDocument
        For Each sh In .Shapes
            If sh.Type = msoTextBox Then tbxs = tbxs + 1
        Next
        xInlines = .InlineShapes.Count
        xFloaters = .Shapes.Count - tbxs
    End With
    xPrompt = "Inline images:" & vbTab & xInlines & vbCr
    xPrompt = xPrompt & "Floating shapes:" & vbTab & xFloaters & vbCr
    xPrompt = xPrompt & vbTab & "Total:" & vbTab & (xInlines + xFloaters) & vbCr
    xPrompt = xPrompt & "Counts do not include headers and footers, etc."
    MsgBox xPrompt, vbInformation, "Kutools for Word"
End Sub
  3. После вставки кода нажмите F5, чтобы запустить его. Появится окно запроса, показывающее количество встроенных изображений и плавающих фигур в документе Word.

    Success dialog

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

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

🤖 Возможности Kutools AI: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка (с сохранением формата) / Супер Перевод (с сохранением формата) / Искусственный интеллект для редактирования / Проверка с помощью ИИ...

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

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

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

➕ Творческие вставки: Вставить разделитель разрядов / Флажки / Переключатели / QR-код / Штрихкод / Несколько изображений. Откройте больше возможностей в группе Вставить...

🔍 Точные выделения: Точно определяйте нужные страницы / таблицы / фигуры / абзацы заголовка. Улучшайте навигацию благодаря расширенным функциям Выбрать ...

⭐ Уникальные улучшения: Переходите к любому расположению / Автоматически вставляйте повторяющийся текст / Переключайтесь между окнами документа /11 инструментов преобразования...

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

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Хотите попробовать эти функции? Скачайте Kutools для Word прямо сейчас! 🚀
 

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

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

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