Страницы: 1
RSS
Удалить все картинки с листа. VBA
 
Приветствую вас.  
 
Пробовал записать действия на макрос, только скроллинг запечатлелся.  
 
На листе лежат картинки, их все нужно удалить. Неужели только вариант с переносом ячеек в новую книгу здесь подойдёт?
 
Sub DeleteShapes()  
   On Error Resume Next  
   Activesheet.Shapes.SelectAll  
   Selection.Delete  
   On Error GoTo 0  
End Sub
 
Спасибо, работает
Страницы: 1
Читают тему
Наверх