ich würde gerne ein Diagramm per VBA in Power Point einfügen und habe auch schon das folgende Programmfragment gefunden. (Quelle:
https://www.herber.de/forum/archiv/164to168/t164875.htm)
Kann mir jemand sagen, was mit "ensprechende Verweise in der Entwicklungsumgebung" gemeint ist. Z.Z. wird die Anweisung "Dim opp AS PowerPoint.Application" nämlich nicht erkannt.
Wahrscheinlich recht einfach zu lösen. Ich wäre über einen Tipp sehr dankbar.
Viele Grüsse und einen schönen Tag noch.
Mathias
Moin, Thomas,
ich habe es unter 97 nicht getestet, aber unter 2000 funktioniert das folgende Vorgehen, was natürlich noch anzupassen ist, da hier immer eine neue Folie angelegt wird (bitte die entsprechenden Verweise in der Entwicklungsumgebung nicht vergessen):
Sub PowerPointStartenUndDatenKopieren()
Dim oPP As PowerPoint.Application
Dim oPres As Presentation
ActiveSheet.Select
'*** Das war in Excel markiert ist, wird in Powerpoint kopiert
Selection.Copy
Set oPP = New PowerPoint.Application
oPP.Visible = True
Set oPres = oPP.Presentations.Add(True)
oPres.Slides.Add 1, ppLayoutBlank
oPres.Application.ActiveWindow.View.Paste
With oPres.Application.ActiveWindow.Selection.ShapeRange
.Left = 138.625
.Top = 59.5
.Width = 442.75
.Height = 421#
End With
End Sub