Freigeben über


CanvasShapes.AddCallout-Methode (Word)

Fügt einem Zeichenbereich eine rahmenlose Legende mit Linie hinzu. Gibt ein Shape-Objekt zurück, das die Legende darstellt.

Syntax

Ausdruck. AddCallout (Type, Left, Top, Width, Height)

expression Erforderlich. Eine Variable, die eine CanvasShapes-Auflistung darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Typ Erforderlich MsoCallout Der Legendentyp.
Left Erforderlich Single Die Position des linken Rands des Begrenzungsrahmens der Legende in Punkt.
Top Erforderlich Single Die Position des oberen Rands des Begrenzungsrahmens der Legende in Punkt.
Width Erforderlich Single Die Breite des Begrenzungsrahmens der Legende in Punkt.
Height Erforderlich Single Die Höhe des Begrenzungsrahmens der Legende in Punkt.

Hinweise

Mit der AddShape-Methode können Sie eine größere Auswahl von Legenden einfügen, z. B. Sprechblasen und Wolken.

Beispiel

In diesem Beispiel wird einem neu erstellten Zeichenbereich eine Legende hinzugefügt.

Sub NewCanvasCallout() 
 Dim shpCanvas As Shape 
 
 'Add drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes.AddCanvas _ 
 (Left:=150, Top:=150, Width:=200, Height:=300) 
 
 'Add callout to the drawing canvas 
 shpCanvas.CanvasItems.AddCallout _ 
 Type:=msoCalloutTwo, Left:=100, _ 
 Top:=40, Width:=150, Height:=75 
End Sub

Siehe auch

CanvasShapes-Auflistungsobjekt

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.