Auf Englisch lesen

Freigeben über


Page.Paste-Methode (Visio)

Fügt die Inhalte der Zwischenablage in ein Objekt ein.

Syntax

Ausdruck. Einfügen (Flags)

Ausdruck Eine Variable, die ein Page-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Flags Optional Variant Bestimmt, wie Shapes beim Einfügen übersetzt werden.

Rückgabewert

Nichts

Bemerkungen

Die Paste-Methode kann nur mit Shape-Objekten verwendet werden, die Gruppen-Shapes darstellen. Ermitteln Sie mithilfe der Type-Eigenschaft, ob es sich bei einem Shape um eine Gruppe handelt.

Mögliche Werte für Flags werden in der Visio-Typbibliothek in VisCutCopyPasteCodes deklariert und in der folgenden Tabelle beschrieben.

Wert Wert Beschreibung
visCopyPasteNormal &H0 Das standardmäßige Kopierverhalten.
visCopyPasteNoTranslate &H1 Shapes werden an ihre ursprünglichen Koordinatenpositionen kopiert.
visCopyPasteCenter &H2 Shapes werden in die Mitte der Seite kopiert.
visCopyPasteNoHealConnectors &H4 Verbinder an ausgeschnittenen Shapes nicht löschen.
visCopyPasteNoContainerMembers &H8 Nicht markierte Elemente von Containern oder Listen nicht ausschneiden und kopieren.
visCopyPasteNoAssociatedCallouts &H16 Nicht markierte Beschriftungen von Shapes nicht ausschneiden und kopieren.
visCopyPasteDontAddToContainers &H32 Eingefügte Shapes nicht zugrunde liegenden Containern hinzufügen.
visCopyPasteNoCascade &H64 Shapes beim Kopieren nicht verschieben.

Das Festlegen von Flags auf visCopyPasteNormal entspricht dem Verhalten in der Benutzeroberfläche. Sie sollten visCopyPasteNormal und die anderen Flags konsistent verwenden. Wenn Sie z. B. den Wert von visCopyPasteNoTranslate zum Kopieren verwenden, sollten Sie diesen Wert auch zum Einfügen verwenden, denn nur so können Sie sicherstellen, dass die Shapes an ihren ursprünglichen Koordinatenpositionen eingefügt werden.

Verwenden Sie die PasteSpecial-Methode, wenn Sie das Format der eingefügten Informationen steuern und (optional) eine Verknüpfung mit der Quelldatei (z. B. einem Microsoft Word-Dokument) herstellen müssen.

Beispiel

Mit diesem VBA-Makro (Microsoft Visual Basic für Applikationen) wird gezeigt, wie die Paste-Methode verwendet wird. Das Makro zeichnet ein Rechteck, kopiert es und fügt dann die Kopie in das Zeichenblatt ein.

 
Public Sub Paste_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 'Draw a rectangle. 
 Set vsoShape = ActivePage.DrawRectangle(1, 5, 5, 1) 
 
 'Copy the shape to the Clipboard. 
 vsoShape.Copy 
 
 'Paste the copy onto the drawing page. 
 ActivePage.Paste 
 
End Sub

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.