[RESOLVED] VBA copy Excel range to presentation now giving error

[Bezzie]

I use the following code to copy a range in Excel and paste it as a picture in an Powerpoint presentation.

It works 100% in Office 2010 but fails, on highlighted line, in Office 365?

'copy the range in the Excel table
 wbTemplate.Worksheets("Presentation").Range("RollingYieldB1").CopyPicture Format:=xlPicture
 'and paste it into the presentation
pptPresentation.Slides(4).Shapes.PasteSpecial ppPasteMetafilePicture, msoFalse

What am I missing?

[Zvoni]

I use the following code to copy a range in Excel and paste it as a picture in an Powerpoint presentation.
What am I missing?

The Error-Code/Message

[Bezzie]

[Zvoni]

Is your Presentation opened in slide-view?

EDIT: Everything i could find to that error indicates, that the clipboard is empty or has wrong Data
Have you checked that your call to "Copy" in/for Excel is successful?

[Bezzie]

The exact same code runs 100% under Office 2010 (Excel 2010 + Powerpoint 2010). Been running daily for a couple years already. Error only occurs when the same model is run under Office 365.

[Zvoni]

Was that Office2010 32 bit?

[Bezzie]

64 bit.

Seems I might have found the problem.

Replaced:

pptPresentation.Slides(4).Shapes.PasteSpecial ppPasteMetafilePicture, msoFalse

With:

pptPresentation.Slides(4).Shapes.PasteSpecial ppPasteEnhancedMetafile

and it seems to be working now. Need to do some more testing to make sure everything works as it should but at least it's not crashing anymore.

[Bezzie]

Office 365 Powerpoint doesn't like the ppPasteMetafilePicture anymore, ppPasteEnhancedMetafile works.