EXTRACT OLE OBJECTS FROM POWERPOINT SLIDE

V

vonclausowitz

Hi All,

I have a ppt with some OLE objects (Word docs) embedded.

I want to have a macro inside powerpoint to extract each word doc and
save them in a certain folder.
I have tried this but it doesn't run:

For i = 0 To UBound(arrShapes) - 1

ActiveWindow.Selection.SlideRange.Shapes(arrShapes(i)).Select
ActiveWindow.Selection.ShapeRange.OLEFormat.DoVerb Index:=0
ActiveWindow.Selection.Unselect

Next i

The code selects one object, opens Word and then its over. I get an
error.

Can this be done in any way?

Regards
Marco
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top