Shapes.AddLabel-Methode (Publisher)

Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das eine Textbeschriftung darstellt.

Syntax

Ausdruck verwendet werden. AddLabel (Ausrichtung, Links, Oben, Breite, Höhe)

expression Eine Variable, die ein Shapes-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Orientation Erforderlich PbTextOrientation Die Ausrichtung der Beschriftung. Kann eine der PbTextOrientation-Konstanten sein.
Left Erforderlich Variant Die Position der linken Begrenzung der Form, die die Textbeschriftung darstellt.
Top Erforderlich Variant Die Position der oberen Begrenzung der Form, die die Textbeschriftung darstellt.
Width Erforderlich Variant Die Breite der Form, die die Textbeschriftung darstellt.
Height Erforderlich Variant Die Höhe der Form, die die Textbeschriftung darstellt.

Rückgabewert

Form

Bemerkungen

Für die Argumente Links, Oben, Breite und Höhe werden numerische Werte in Punkten ausgewertet. Zeichenfolgen können in allen von Microsoft Publisher unterstützten Einheiten vorliegen (z. B. "2,5 Zoll").

Beispiel

Das folgende Beispiel fügt der ersten Seite der aktiven Publikation eine neue horizontale Textbeschriftung hinzu.

Dim shpLabel As Shape 
 
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _ 
 (Orientation:=pbTextOrientationHorizontal, _ 
 Left:=144, Top:=144, _ 
 Width:=72, Height:=18)

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.