Удаление изображений с помощью Excel VBA

Удаление изображений с помощью Excel VBA
На чтение
3 мин.
Просмотров
7
Дата обновления
11.11.2024

Как удалить все изображения на листе Excel 2007? Хороший пример рабочего кода.


  Уменьшить фигуру как Excel.shapeFor Каждую фигуру в ActiveSheet.Shapes shape.DeleteNext  

Самый простой способ:

  Activesheet.Pictures.Delete  

или

  Activesheet.Shapes.Delete  

В зависимости от типа объекта ваше изображение.

Удаляет все изображения с большей эффективностью, чем повторяется (цикл) и удаляется их одно за другим.

1


Чтобы удалить все изображения или другие фигуры, вы можете перебрать их все и проверить тип:

  В моем случае этот код был  полезно, потому что мой лист был заполнен прозрачными формами типа msoAutoShape, которые я считал изображениями.  Итак, Activesheet.Pictures.Delete не работал.  
Вы можете найти все типы фигур по этой ссылке: http://msdn.microsoft.com/en-us/library/aa432678(v= office.12) .aspx


0 Комментариев
Комментариев на модерации: 0
Оставьте комментарий