Shapes.AddCallout-Methode (Publisher)
Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das eine randlose Linienbeschriftung darstellt.
Syntax
Ausdruck. AddCallout (Type, Left, Top, Width, Height)
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Typ | Erforderlich | MsoCalloutType | Die Art der Legendenlinie. Dies kann eine der MsoCalloutType-Konstanten sein. |
| Left | Erforderlich | Variant | Die Position der linken Begrenzung der Form, die die Legendenlinie darstellt. |
| Top | Erforderlich | Variant | Die Position der oberen Begrenzung der Form, die die Legendenlinie darstellt. |
| Width | Erforderlich | Variant | Die Breite der Form, die die Legendenlinie darstellt. |
| Height | Erforderlich | Variant | Die Höhe der Form, die die Legendenlinie darstellt. |
Rückgabewert
Form
Bemerkungen
Für die Argumente Left, Top, Width und Height werden numerische Werte in Punkt ausgewertet. Zeichenfolgen können in beliebigen Einheiten enthalten sein, die von Microsoft Publisher unterstützt werden (z. B. "2,5 zoll").
Beispiel
Das folgende Beispiel fügt der ersten Seite der aktiven Publikation eine neue frei drehbare Legendenlinie hinzu.
Dim shpCallout As Shape
Set shpCallout = ActiveDocument.Pages(1).Shapes.AddCallout _
(Type:=msoCalloutTwo, _
Left:=144, Top:=216, _
Width:=36, Height:=72)
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.