Posted By

mikaelpelle on 08/08/11


images excel vba

Versions (?)

MS Excel: Remove all images

 / Published in: Visual Basic

VBA script to remove all the images present in the active sheet of the Microsoft Excel spreadsheet.

  1. Sub tester()
  2. Dim DrObj
  3. Dim Pict
  4. Set DrObj = ActiveSheet.DrawingObjects
  5. For Each Pict In DrObj
  6. Pict.Select
  7. Pict.Delete
  8. Next
  9. End Sub

Report this snippet  

You need to login to post a comment.