Как посчитать количество изображений в документе Word?
Если в вашем документе Word есть несколько изображений, которые содержат как встроенные изображения, так и плавающие фигуры, теперь вы хотите подсчитать количество этих изображений во всем документе, как вы могли бы получить это число изображений быстро и правильно?
Подсчитайте количество встроенных изображений с помощью функции поиска и замены
Count количество встроенных изображений и плавающих фигур с кодом VBA
Подсчитайте количество встроенных изображений с функцией поиска и замены
Функция Найти и заменить в Word может помочь вам быстро и легко подсчитать количество встроенных изображений, пожалуйста сделайте следующее:
1 . Нажмите Home > Find > Advanced Find , см. Снимок экрана:

2 . В диалоговом окне Найти и заменить на вкладке Найти введите ^ g в Найдите текстовое поле , а затем выберите Основной документ из раскрывающегося списка Найти в , см. Снимок экрана:

3 . И затем вы можете увидеть, что количество встроенных изображений в этом документе Word было отображено, как показано на следующем снимке экрана:

Подсчитайте количество встроенных изображений и плавающих фигур с помощью кода VBA
Вышеупомянутый метод может только подсчитывать количество встроенных изображений, если в документе есть несколько плавающих фигур, они не будут подсчитаны. Следующий код VBA может помочь вам подсчитать как встроенные изображения, так и плавающие фигуры, пожалуйста, сделайте следующее:
1 . Удерживая нажатыми клавиши ALT + F11 , откройте окно Microsoft Visual Basic для приложений .
2 . Затем нажмите Вставить > Модуль , скопируйте и вставьте приведенный ниже код в открытый пустой модуль, см. Снимок экрана:
Код VBA: подсчитайте количество встроенных изображений и плавающих фигур:
3 . После вставки кода нажмите клавишу F5 , чтобы запустить этот код, и появится окно подсказки, чтобы сообщить вам, сколько встроенных изображений и плавающих фигур в этом документе Word, см. Снимок экрана:
Количество рисунков в документе: макрос
Как указать кол-во используемых в тексте рисунков? Рисунки пронумерованы как Caption (SEQ Рисунок).
Я могу вам предложить следующий макрос для вставки в документ текста с указанием количества рисунков в текущем документе.
Установите курсор ввода в том месте документа, где вы хотите вставить текст с количеством рисунков и запустите макрос:
Если вы не знаете, как подключить к документу и применить эти макросы, изучите следующие заметки с сайта:
Как узнать сколько рисунков в документе word
Мне задали вопрос:
Есть ли Word-2007 поле которое будет показывать количество рисунков в файле и поле показывающее количество таблиц.
Как это делает поле
Я задумался. Действительно, если человек нумерует рисунки, то почему нельзя узнать количество таких рисунков без использования макросов? Я нашёл решение с использованием полей. Приведенное поле нужно вставить в самый конец документа, чтобы оно правильно вело подсчёт:
Это поле формирует закладку с именем ImagesCount и записывает в неё последнее значение последовательности с идентификатором «Рисунок». Имя для закладки можно выбирать любое. Главное, чтобы оно было осмысленными.
Теперь, чтобы вставить в нужное место документа количество рисунков, нужно просто добавить перёкрёстную ссылку на эту закладку. Это можно сделать или через меню, или введя поле вручную:
Этот метод имеет один недостаток: если в документе не сквозная нумерация рисунков и зависит от заголовков первого уровня, то в закладку будет записано только количество рисунков в последнем разделе. Думаю, что эту задачу, тоже можно решить.
Количество таблиц и формул вставляется аналогично: идентификаторы «Таблица» и «Формула» соответственно.
количество рисунков
Друзья! Мы перешли с форума в Телеграм. Давайте быстрее к нам!
@twriters
чат для технических писателей в Telegram
В меню Вставка (Insert) в подменю Ссылка (Reference) выберите команду Название (Caption). Откроется диалоговое окно и в нем заполните:
Нажмите кнопку Автоназвание (AutoCaption). Откроется другое диалоговое окно, в котором вам следует выбрать тот объект, к которому нужно добавлять подпись. Для рисунков это будет Рисунок Microsoft Word (Microsoft Word Picture), для таблиц — Таблица Microsoft Word (Microsoft Word Table) и т.д.
Вы можете выбрать из списков поля Подпись (Use label) или поля Положение (Position) нужные вам значения. Если хотите, можете создать свои значения, нажав в этом окне на кнопку Создать (New Label).
Щелчок по кнопке Нумерация (Numbering) позволит вам выбрать стиль нумерации. По умолчанию используется стиль 1, 2, 3. Кроме того, вы можете включить в название объекта номер главы, в которой располагается данный объект.
Нажмите ОК для сохранения установок и закрытия окон.
Теперь, при вставке рисунка или таблицы, вместе с ними будет вставляться и подпись к ним, [b:2hzso7tw]с автоматической нумерацией.[/b:2hzso7tw]
Т.е последний рисунок и будет содержать количество всех рисунков)) в вашем документе.
Явного поля (типа «Кол-во страниц») для рисунков нет.
Рисунки — внешние внедренные объекты любого вида (а не собственные элементы Worda), поэтому Word их не идентифицирует и не может подсчитать.
Один из вариантов решения проблемы был предложен выше.
Есть и другие способы, зависящие от особенностей документа.
Например, если название рисунков оформлять уникальным стилем, то количество рисунков можно подсчитать как количество элементов текста с заданным стилем.
Если документ не содержит таблиц, то рисунки можно размещать в скрытую таблицу.
Есть макрос, который подсчитывает кол-во таблиц в документе
(n=ActiveDocument.Table.Count),
тогда он подсчитает и кол-во рисунков.
Наверное, есть и много других способов.
Я не думаю, что это настолько трудоемкий процесс, что его надо непременно автоматизировать.
Макрос — это для развития темы
Ваш способ тоже можно записать как макрос. Впрочем, он будет находить количество рисунков, вставленных ВНУТРЬ текста так называемых InLineShapes — по щелчку они обрамляются рамкой с чёрными маркерами, но не найдёт «накладных» фигур Shapes.