TextFrame2.MarginRight Property (PowerPoint)
Returns or sets the distance (in points) between the right edge of the text frame and the right edge of the inscribed rectangle of the shape that contains the text. Read/write.
Syntax
expression .MarginRight
expression An expression that returns a TextFrame2 object.
Return Value
Single
Example
The following example adds a rectangle to a slide, adds text to the rectangle, and then sets the margins for the text frame.
Public Sub MarginRight_Example()
Set pptSlide = ActivePresentation.Slides(1)
With pptSlide.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140).TextFrame2
.TextRange.Text = "Here is some sample text"
.MarginBottom = 10
.MarginLeft = 10
.MarginRight = 10
.MarginTop = 10
End With
End Sub