Paste Excel chart with embeded workbook: PowerPoint for Mac

[5amuel]

Hi
The following VBA code pastes Excel graphs to PowerPoint with the *workbook embeded* (same as clicking Paste Special -> Keep source formatting and embed workbook.



Can anyone assist in translating this code into Excel for Mac 2011? It breaks on "ExecuteMso"

Public PPApp As PowerPoint.Application
Public PPPres As PowerPoint.Presentation
Public PPSlide As PowerPoint.Slide
Sub ExcelToExistingPowerPoint()
    ActiveSheet.Select
    ActiveSheet.Copy
    ActiveSheet.Shapes(xChart).Copy
    Set PPSlide = PPPres.Slides.Add(PPPres.Slides.Count + 1, 2)
    PPSlide.CustomLayout = PPPres.Designs(1).SlideMaster.CustomLayouts(2)
    PPApp.ActiveWindow.View.GotoSlide PPSlide.SlideIndex
    PPSlide.Shapes.Placeholders(3).Select msoTrue
    PPApp.CommandBars.ExecuteMso "PasteExcelChartSourceFormatting"
End Sub

Thanks in advance!

[macropod]

ExecuteMso was added to Office 2010, but VBA in Office 2011 is more likely to be based on Office 2007. Therefore, you'll need to use only the methods available in Office 2007 & earlier. Not being a PowerPoint specialist, though, I can't advise on that.

I'll move the thread to the PowerPoint forum in the hope someone there will have an answer.

PS: See also http://www.mrexcel.com/forum/general...-2010-a-2.html