Solved

Excel 2013 VBA - Delete all pictures from a sheet

Posted on 2016-08-10
4
50 Views
Last Modified: 2016-08-10
Dear Experts,

I have a file which contains a lot of small pictures, could you please advise which VBA code could delete all of them from the sheet?

Thanks in advance,
0
Comment
Question by:csehz
  • 2
4 Comments
 
LVL 33

Assisted Solution

by:Rob Henson
Rob Henson earned 250 total points
ID: 41749984
Is it all Objects on the sheet that are to be deleted?

If so:

ActiveSheet.DrawingObjects.Select
Selection.Delete

Thanks
Rob H
0
 
LVL 30

Accepted Solution

by:
Subodh Tiwari (Neeraj) earned 250 total points
ID: 41749991
Only this is suffice...

Sub DeletePictures()
ActiveSheet.DrawingObjects.Delete
End Sub

Open in new window

0
 
LVL 1

Author Closing Comment

by:csehz
ID: 41749995
Thanks very much
0
 
LVL 30

Expert Comment

by:Subodh Tiwari (Neeraj)
ID: 41750000
You're welcome. Glad to help.
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Microsoft Office Picture Manager was included in Office 2003, 2007, and 2010, but not in Office 2013. Users had hopes that it would be in Office 2016/Office 365, but it is not. Fortunately, the same zero-cost technique that works to install it with …
A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …
This Micro Tutorial will demonstrate on a Mac how to change the sort order for chart legend values and decrpyt the intimidating chart menu.

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question