Як перевірити, чи є форма чи зображення в активному аркуші?

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

Перевірте, чи є форма чи зображення в активному аркуші

---

Перевірте, чи є форма чи зображення в активному аркуші

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

1. прес Alt + F11 клавіші для ввімкнення Microsoft Visual Basic для додатків вікна.

2. клацання Insert > Модулі і вставте нижче код у сценарій.

VBA: Перевірте, чи існує фігура чи зображення

Sub CheckImage () 'ОновленняExtendoffice20170927 Dim xChar As Picture Dim xFlag As Boolean Dim xCharName As String On Error Resume Next Application.ScreenUpdating = False xCharName = "cat" xFlag = False For each xChar In ActiveSheet.Pictures Debug.Print xChar.Name If xChar.Name = xCharName then xCharName then xCharName = xCharName MsgBox "Зображення знаходиться на активному аркуші", vbInformation, "KuTools для Excel" xFlag = Істинний вихід для кінця, якщо далі, якщо ні xFlag Тоді MsgBox "Зображення відсутній на активному аркуші", vbInformation, "KuTools для Excel" Кінець Якщо Application.ScreenUpdating = True End Sub

3. прес F5 для запуску коду вискакує діалогове вікно, що нагадує, чи є зображення в активному аркуші.

Чайові: У коді макросу ви можете змінити назву зображення в xCharName = "кішка" щоб задовольнити ваші потреби.

---

Відносні статті:

• Як швидко перевірити, чи містить діапазон якісь значення в Excel?