Shapes.AddLabel-Methode (Publisher)
Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das eine Textbeschriftung darstellt.
Syntax
Ausdruck. 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. Dies 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 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 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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für