Page.DropCallout-Methode (Visio)
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 | Shape | Das vorhandene Shape, mit dem die Beschriftung verknüpft werden soll |
Rückgabewert
Shape
Hinweise
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.