Export Shapes as graphics

Problem

How can I export the currently selected shape or shapes, not the entire slide, to a graphics file?

Solution

First, go into the VBA editor (press Alt+F11), then press F2 to open the object browser.

Right-click in the Members of pane and put a check next to Show hidden members.

Now you can write the code you need.

To export the currently selected shape (or the first shape of a multi-shape selection) to a GIF file in C:\Workarea\filename.gif

Call ActiveWindow.Selection.ShapeRange(1).Export( _
	"C:\Workarea\filename.gif", _
	ppShapeFormatGIF)

Change the filename's extension and substitute different values (Intellisense will show them to you) for ppShapeFormatGIF if you want to export to other formats.

Use .ShapeRange.Export instead of .ShapeRange(1).Export to export the entire current selection to a graphics file. There will be a white or black background beween shapes, regardless of what your presentation's background might be.

This works at least as far back as PPT 2000.

See How do I use VBA code in PowerPoint? to learn how to use this example code

Problem

.

---