title | api_name | ms.assetid | ms.date | ms.localizationpriority | |
---|---|---|---|---|---|
TextFrame2.MarginTop property (Office) |
|
d42e148d-8a92-3331-b179-3a3af4447328 |
01/25/2019 |
medium |
Returns or sets the distance (in points) between the top of the text frame and the top of the inscribed rectangle of the shape that contains the text. Read/write.
expression.MarginTop
expression An expression that returns a TextFrame2 object.
The following code adds a rectangle to a slide, adds text to the rectangle, and then sets the margins for the text frame.
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
[!includeSupport and feedback]