Hallo zusammen,
Ich habe folgendes Problem:
Ich habe eine Excel mit ein paar Diagrammen drin. Diese möchte ich vollautomatisch per VBA nach Ppt kopieren.
Ich habe 2 verschiedene MSO Versionen (arbeitsbedingt).
Einmal die Version: 2016 MSO (16.0.10325.20082) 32 Bit --> Hier funktioniert das Makro problemlos!
Und einmal die Version: 2016 MSO (16.0.8431.2110) 32 Bit --> Hier tritt folgender Fehler auf: Das Makro kopiert das Chart und beim Versuch es in Ppt einzufügen schließt sich ppt ohne Fehlermeldung... Das Makro wird an dieser Stelle beendet.
Die hauptsächlichen Befehle, welche ich zum kopieren und einfügen verwende sind folgende:
ThisWorkbook.Sheets("Folie6_1Diagramm2").Select
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Copy
pptApplication.ActivePresentation.Slides(pptPresentation.Slides.Count).Select
pptApplication.ActivePresentation.Slides(pptPresentation.Slides.Count).Shapes("Diagrammplatzhalter 6").Select
pptPresentation.Windows(1).View.PasteSpecial
Für mich komisch ist hierbei, dass es bei der einen Version wunderbar klappt und bei der anderen nicht...
Hat vielleicht jemand eine Idee?
Vielen Dank im Voraus!
|