Як видалити всі зображення в діапазоні комірок?

Якщо на вашому аркуші є кілька зображень, тепер ви хочете видалити деякі з них у визначеному діапазоні. Як ви швидко з цим справитесь?

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

Видаліть усі зображення на аркуші або в цілій книзі за допомогою Kutools для Excel

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

Ось простий код VBA може допомогти вам видалити зображення у вибраному діапазоні, не видаляючи їх одне за одним, будь ласка, зробіть так:

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуль і вставте наступний код у Модулі Вікно

Код 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 для Excel

Якщо вам потрібно видалити всі зображення з робочого аркуша або книги, файл Kutools для Excel 's Видалити ілюстрації та об'єкти утиліта може зробити вам послугу.

Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів.

Перейдіть до Завантажити
Безкоштовна пробна версія 30 днів Купити
PayPal / MyCommerce

після установки Kutools для Excel, будь ласка, виконайте наступне:

1. Клацання Кутулс > видаляти > Видалити ілюстрації та об'єкти, див. скріншот:

2, в Видалити ілюстрації та об'єкти діалогове вікно, поставте галочку фотографії від видаляти , а потім виберіть область, для якої ви хочете видалити зображення з-під заглядати розділ, див. знімок екрана:

3. Потім натисніть Ok кнопку, і всі зображення будуть видалені з аркуша або з цілої книги, як ви вибрали.

Натисніть, щоб завантажити Kutools для Excel та безкоштовну пробну версію зараз!

Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.

Детальніше ... Завантажити безкоштовно... Придбати ...

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!

Детальніше ... Завантажити безкоштовно... Придбати ...