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

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

Удалить все изображения в определенном диапазоне ячеек с кодом VBA

Удалите все изображения на листе или всей книге с помощью Kutools for Excel

---

Удалить все изображения в определенном диапазоне ячеек с кодом VBA

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

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

2. Нажмите Вставить > Модуль, и вставьте следующий код в Модули Окно.

Код VBA: удалить все изображения в выбранном диапазоне ячеек:

Sub DeletePic()
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("A5:B8")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Внимание: В приведенном выше коде A5: B8 это диапазон, из которого вы хотите удалить изображения, измените его по своему усмотрению.

3, Затем нажмите F5 ключ для запуска этого кода, и изображения в выбранном диапазоне были удалены сразу, см. снимок экрана:

---

Удалите все изображения на листе или всей книге с помощью Kutools for Excel

Если вам нужно удалить все изображения с листа или книги, Kutools для Excel 's Удалить иллюстрации и объекты Утилита может оказать вам услугу.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней.

Перейти к загрузке Бесплатная пробная версия 30 днейпокупка PayPal / Моя коммерция

После установки Kutools for Excel, пожалуйста, сделайте следующее:

1. Нажмите Кутулс > Удалить > Удалить иллюстрации и объекты, см. снимок экрана:

2. В Удалить иллюстрации и объекты диалоговое окно, отметьте Картинки из Удалить раздел, а затем выберите область, в которой вы хотите удалить изображения из-под заглянуть раздел, см. снимок экрана:

3. Затем нажмите Ok кнопку, и все изображения будут удалены с рабочего листа или всей книги, как вы выбрали.

Нажмите, чтобы загрузить Kutools for Excel и бесплатную пробную версию сейчас!