Shapes.Paste-Methode (PowerPoint)
Fügt die Formen, Folien oder Text aus der Zwischenablage in die angegebene Shapes-Auflistung an der obersten Position der Z-Ordnung ein. Jedes eingefügte Objekt wird ein Element der angegebenen Shapes-Auflistung. Wenn die Zwischenablage ganze Folien enthält, werden die Folien als Formen eingefügt, die die Bilder der Folien enthalten. Enthält die Zwischenablage einen Textbereich, wird der Text in eine neu erstellte TextFrame -Form eingefügt. Gibt ein ShapeRange -Objekt, das die eingefügten Objekte darstellt.
Syntax
Ausdruck. Kleister
expression Eine Variable, die ein Shapes-Objekt darstellt.
Rückgabewert
ShapeRange
Hinweise
Mit der ViewType -Eigenschaft können Sie die Ansicht für ein Fenster festlegen, bevor der Inhalt der Zwischenablage darin eingefügt wird. Die folgende Tabelle zeigt, welche Objekte in die verschiedenen Ansichten eingefügt werden können.
| Ansicht | Objekte aus der Zwischenablage |
|---|---|
| Folienansicht oder Notizenseitenansicht | Formen, Text oder ganze Folien. Wenn Sie eine Folie aus der Zwischenablage einfügen, wird ein Bild der Folie als eingebettetes Objekt auf die Folie, master oder Notizenseite eingefügt. Wenn eine Form ausgewählt ist, wird der eingefügte Text an den Text der Form angefügt. Wenn Text ausgewählt ist, ersetzt der eingefügte Text die Auswahl; Wenn etwas anderes ausgewählt ist, wird der eingefügte Text in einen eigenen Textrahmen eingefügt. Eingefügte Formen werden oben in der Z-Reihenfolge hinzugefügt und ersetzen keine ausgewählten Shapes. |
| Gliederungsansicht | Text oder ganze Folien. In die Gliederungsansicht können Sie keine Formen einfügen. Eine eingefügte Folie wird vor der Folie eingefügt, die den Cursor enthält. |
| Foliensortierungsansicht | Ganze Folien. In die Foliensortierungsansicht können Sie keine Formen einfügen. Eine eingefügte Folie wird entweder am Cursor oder nach der letzten Folie eingefügt, die in der Präsentation markiert ist. |
Wenn der Quellinhalt nicht vollständig heruntergeladen wurde, schlägt diese Methode fehl, und es tritt ein Fehler auf. Weitere Informationen zu Teildokumenten finden Sie unter Arbeiten mit Teildokumenten.
Beispiel
Dieses Beispiel kopiert Form 1 von Folie 1 der aktiven Präsentation in die Zwischenablage und fügt sie anschließend in Folie 2 ein.
With ActivePresentation
.Slides(1).Shapes(1).Copy
.Slides(2).Shapes.Paste
End With
Dieses Beispiel schneidet den Text in Form 1 von Folie 1 der aktiven Präsentation aus, kopiert ihn in die Zwischenablage und fügt ihn anschließend nach dem ersten Wort in Form 2 dieser Folie ein.
With ActivePresentation.Slides(1)
.Shapes(1).TextFrame.TextRange.Cut
.Shapes(2).TextFrame.TextRange.Words(1).InsertAfter.Paste
End With
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.