Excel VBA fails to insert a picture file (.jpg) into PowerPoint

**MrHockey** · 11-06-2010, 01:30 AM

First let me start by saying thank you for your time and effort to help me solve this problem.

The attached excel workbook builds a power point (3 slides), inserts a text box into slide 1 with text from the excel and inserts a picture (.jpg) into slide 2. Everything works except after the picture inserts a 'Type Mismatch' run time error triggers. The line of code that errors was generated by the macro generator in powerpoint but using it in Excel VBA fails (I have the PowerPoint reference switched on). Here is a snipped of the code so you don't have to open the workbook but the workbook does a better job of showing the problem. The 3rd line from the bottom up triggers the runtime error 'Run-time error 13, Type Mismatch'. I checked the path and filename like crazy, I don't think that's the problem. Thanks again for your help.

Please Login or Register  to view this content.

**mrice** · 11-06-2010, 07:21 AM

Try this variant.

Please Login or Register  to view this content.

**Andy Pope** · 11-06-2010, 08:22 AM

Change the declaration of the oPicture object.
You also need to alter the reference in order to center the picture

Please Login or Register  to view this content.

Please Login or Register  to view this content.

**MrHockey** · 11-06-2010, 01:57 PM

Thanks Martin and Andy, that did the trick. When jumping back and forth between Office apps, it's important to qualify the 'with' statement for which ever office app is being used. My diagnostic skills were weak on this but with your help I'll be sure to watch for this in the future. I really appreciate your help, I was truely stuck on this. Thanks again!