Shapes.AddLabel method (Publisher)
Adds a new Shape object representing a text label to the specified Shapes collection.
Syntax
expression.AddLabel (Orientation, Left, Top, Width, Height)
expression A variable that represents a Shapes object.
Parameters
Name | Required/Optional | Data type | Description |
---|---|---|---|
Orientation | Required | PbTextOrientation | The orientation of the label. Can be one of the PbTextOrientation constants. |
Left | Required | Variant | The position of the left edge of the shape representing the text label. |
Top | Required | Variant | The position of the top edge of the shape representing the text label. |
Width | Required | Variant | The width of the shape representing the text label. |
Height | Required | Variant | The height of the shape representing the text label. |
Return value
Shape
Remarks
For the Left, Top, Width, and Height arguments, numeric values are evaluated in points; strings can be in any units supported by Microsoft Publisher (for example, "2.5 in").
Example
The following example adds a new horizontal text label to the first page of the active publication.
Dim shpLabel As Shape
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _
(Orientation:=pbTextOrientationHorizontal, _
Left:=144, Top:=144, _
Width:=72, Height:=18)
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for