Chart von Excel nach PowerPoint
Excel
Hallo Forum
Ich habe ein Problem mit Excel-Powerpoint 2010, glaube aber, dass es auch im 2007 nicht so funktioniert, wie ich es gern hätte.
Ich möchte per VBA vom Excel Charts im Powerpoint als Chart mit Datenverknüpfung kopieren (nicht als Bild).
Per Hand würde ich das mit Chart kopieren und im PPt mit Einfügen mit Verknüpfung machen.
Mit folgender Syntax klappt es:
Sub ChartKopieren()
Set PPApp = CreateObject("Powerpoint.Application")
PPApp.Visible = msoTrue
'Chart im Excel kopieren
ActiveSheet.ChartObjects(1).Copy
'Chart im PPt einfügen
PPApp.ActiveWindow.Selection.SlideRange.Shapes.PasteSpecial DataType:= _
ppPasteMetafilePicture
End Sub
Problem: Wenn ich nun im Excel unter Verweise "Microsoft PowerPoint 14.0 ObjectLibrary" einfüge, wird das ganze nicht mehr als Chart, sonder als Bild eingefügt.Ohne diese Verweise, kann ich aber im PPT keine neuen Slides einfügen und Formatierungen vornehmen.
Hat jemand eine Idee, warum das funktioniert, wenn die Bibliothek nicht eingebunden ist? Wie kann ich mein Problem lösen, oder habe ich einen Überlegungsfehler?
Besten Dank
Robert