Page.DropCallout-Methode (Visio)

  • Artikel

Erstellt ein neues Legenden-Shape-Objekt auf dem Zeichenblatt in der Nähe des angegebenen Ziel-Shapes und ordnet die Legende dem Ziel-Shape zu. Gibt das Beschriftungs-Shape zurück.

Syntax

Ausdruck. DropCallout( _ObjectToDrop_ , _TargetShape_ )

Ausdruck Eine Variable, die ein Page-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
ObjectToDrop Erforderlich [UNBEKANNT] Die Legende, die der Seite hinzugefügt werden soll. Kann ein Master-, MasterShortcut-, Shape- oder IDataObject-Objekt sein.
TargetShape Erforderlich Form Das vorhandene Shape, mit dem die Beschriftung verknüpft werden soll

Rückgabewert

Form

HinwBemerkungeneise

Wenn es sich bei dem Parameter ObjectToDrop nicht um ein Microsoft Visio-Objekt handelt, gibt Visio den Fehler "Ungültiger Parameter" aus. Wenn der übergebene Wert ein Shape ist, das nicht dem Kontext der Methode entspricht, gibt Visio den Fehler "Ungültige Quelle" aus.

Wenn das TargetShape-Paremeter NULL ist, platziert Visio das Legenden-Shape in der Mitte der Seite und ordnet es keinem Ziel-Shapes zu. Wenn die angegebenen Ziel-Shapes keine Mitglieder der obersten Ebene der Seite sind, gibt Visio den Fehler "Ungültiger Parameter" aus.

Die DropCallout-Methode entspricht dem Befehl Beschriftung einfügen auf der Visio-Benutzeroberfläche. (Klicken Sie auf der Registerkarte Einfügen auf Beschriftung.)

Beispiel

Im folgenden beispiel für Visual Basic for Applications (VBA) wird gezeigt, wie sie die DropCallout-Methode verwenden, um der aktiven Seite eine Legende hinzuzufügen und sie einer bestimmten Form zuzuordnen.

Dim vsoDocument As Visio.Document
Set vsoDocument = Application.Documents.OpenEx(Application.GetBuiltInStencilFile(visBuiltInStencilCallouts, visMSUS), visOpenHidden) 
Application.ActivePage.DropCallout vsoDocument.Masters.ItemU("Text callout"), vsoTargetShape
vsoDocument.Close

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.