Late Binding - wer kann helfen
13.07.2004 20:47:40
Moldor
ich möchte ein Diagrammblatt aus Excel nach PowerPoint exportieren. Da das Tool später unter verschiedenen Versionen laufen soll, soll late - binding verwendet werden
Folgendes habe ich schon gefunden:
Sub Export()
Dim PPTApp as Object
Set PPTApp = CreateObject("PowerPoint.Application")
With PPTApp
.visible = msoTrue
.Presentations.Add
End Sub
Soweit funktioniert dann auch alles. Es wird PowerPoint gestartet. Nun will ich ein Blatt einfügen und ergänze den code um
With .ActivePresentation
.Slides.Add 1,ppLayoutBlank
End with
Und da hängt es bereits. Es wird ein Verweisproblem gemeldet
Danke im voraus für Vorschläge
Moldor