Как удалить все изображения в Excel сразу

Обновлено: 05.07.2024

< бр />

Махеш Маквана

Махеш Маквана
Писатель

Махеш Маквана — технический писатель-фрилансер, специализирующийся на написании практических руководств. Он пишет технические учебники уже более десяти лет. Он написал для некоторых известных технических сайтов, включая MakeUseOf, MakeTechEasier и Online Tech Tips. Подробнее.

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

Удалить сразу несколько изображений в Excel

В Excel вы можете использовать функцию «Перейти к специальному», чтобы выбрать все объекты (включая изображения) на листе. Затем вы нажимаете Удалить, чтобы удалить все ваши изображения сразу.

Имейте в виду, что при этом из ваших электронных таблиц удаляются и другие объекты, в том числе любые добавленные вами диаграммы.

Чтобы начать удаление изображений, сначала откройте электронную таблицу в Microsoft Excel. В нижней части электронной таблицы щелкните лист, в котором вы хотите удалить все изображения.

На вкладке "Главная" в разделе "Редактирование" выберите "Найти и выбрать".

В меню "Найти и выбрать" нажмите "Перейти к специальному".

Откроется окно «Перейти к специальному». Здесь включите параметр «Объекты» и нажмите «ОК».

Excel выберет все объекты (включая изображения) на текущем листе. Чтобы удалить эти выбранные элементы, нажмите клавишу Delete на клавиатуре.

И все. Все изображения (и объекты) теперь удалены с вашего рабочего листа.

Подобным образом вы также можете удалить сразу все изображения в Microsoft Word.

›5 шрифтов, которые следует прекратить использовать (и лучшие альтернативы)
› Как установить Google Play Маркет в Windows 11
› Как восстановить метки панели задач в Windows 11
› Почему прозрачные чехлы для телефонов желтеют?
› Что означает XD и как вы его используете?
› Почему не было Windows 9?

Я хочу удалить их все - в настоящее время Ctrl-A просто выбирает все ячейки.

Как выбрать все фотообъекты?

4 ответа 4

Я нашел быстрый шаг, как показано ниже, ссылка на этот пост

Нажмите F5, чтобы открыть поле "Перейти".
Нажмите "Особое".
Попадание в объекты
Выбраны все фотообъекты

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

Нажмите Alt + F11, чтобы открыть VBE.
нажмите Ctrl + G, чтобы открыть окно.
введите activesheet.shapes.selectall
нажмите Enter
Вернитесь к листу, и все будет выбрано, поэтому вы можете удалить ИЛИ
Если вы не хотите возвращаться к листу, просто введите selection.delete и нажмите Enter.

Вы не можете быстро выбрать все плавающие изображения на листе Excel.

Но вы можете найти обходной путь.

Создайте новый лист.
Затем используйте CTRL-A, чтобы выбрать все.
Копировать все ячейки
Перейти к новому листу
Вставьте и убедитесь, что это приемлемо и содержит все, что вам нужно.
Удалите старый лист.

ПОПРОБУЙТЕ ПОД МОИМ ПЕРВЫМ МАКРО

Не тот ответ, который вы ищете? Просмотрите другие вопросы с тегом vba microsoft-excel-2013 photos selection или задайте свой вопрос.

Связано

Связанные

Горячие вопросы о сети

Чтобы подписаться на этот RSS-канал, скопируйте и вставьте этот URL-адрес в программу для чтения RSS.

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

Excel удалить все изображения

При копировании содержимого с веб-сайта в Excel неизбежно копирование ненужных изображений. Поскольку некоторые веб-сайты содержат десятки изображений, удаление изображений по одному — пустая трата времени. В этом уроке я покажу, как удалить все изображения сразу.

Допустим, я хочу скопировать приведенную ниже таблицу с веб-сайта. В поле Страна происхождения у каждой страны есть логотип страны.

Когда мы копируем таблицу в Excel, логотипы стран также копируются.

Нажмите F5 > Специальные > Объекты > ОК

Теперь все изображения выбраны, нажмите кнопку Удалить на клавиатуре, чтобы удалить все изображения.

Excel VBA удалить все изображения

Нажмите ALT+F11, вставьте приведенный ниже код в модуль

Запустите макрос, теперь все картинки удалены.

В качестве альтернативы вы можете использовать DrawingObjects.Delete

Как вы можете заметить в коде VBA, DrawingObjects имеет метод Delete, но не Shapes. Если вы хотите использовать For Loop для циклического просмотра каждого объекта, вы должны использовать Shapes.

Excel VBA удаляет все изображения в определенных ячейках

Я не нашел способа удалить изображения в определенных ячейках без использования VBA, поэтому я считаю, что VBA — это то, что нужно.

Допустим, мы хотим удалить изображения в определенных ячейках, только изображения в диапазоне E2:E9.

Используйте свойство TopLeftCell, чтобы определить, содержит ли ячейка изображение. Нажмите здесь, чтобы узнать больше о методе пересечения.

Представьте себе файл Excel, содержащий более 180 рабочих листов. Теперь представьте, что каждый рабочий лист содержит одно или два изображения, чтобы оно выглядело красиво и профессионально, и все такое.

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

Что еще хуже, представьте, что некоторые рабочие листы содержат меньшие значки изображений, которые на самом деле полезны.

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

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

Вот макрос, который можно скопировать и вставить в модуль VBA (вот как) вашего файла Excel, чтобы избавиться от всех изображений во всем файле Excel, соответствующих определенному критерию размера.

Sub AllPicts()
С приложением
.ScreenUpdating = False
Тусклый рисунок как форма
При ошибке Возобновить следующий
Для каждого sh в листах
Для каждой пикт В ш.Фигурах
Если рис.Тип = msoPicture И pict.Width > 200 И pict.Height > 35 Затем
sh.Activate
pict.Delete
n = n + 1
End If
Next pict
Далее sh
MsgBox n & "изображения были успешно удалены."
.ScreenUpdating = True
End With
End Sub

Как вы можете видеть, размер удаляемых изображений указан следующим образом:
pict.Width > 200 и pict.Height > 35

В нашем примере мы удалим все изображения, ширина которых превышает 200 пикселей и превышает 35 пикселей. Не стесняйтесь изменять эти два параметра по своему усмотрению.

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

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

Дмитрий Шестерин

Дмитрий все сделал. От продаж и маркетинга в сфере мобильных телекоммуникаций и полиграфии (в России и Германии) до инженера по продажам и руководителя отдела маркетинга (в Faronics). У Дмитрия непревзойденная любовь к Excel, а его чувство юмора напоминает Амброуза Бирса, его любимого писателя.

Читайте также: