TextFrame Property

Applies To

Shape object, ShapeRange collection object.

Description

Returns a TextFrame object that contains the text for the specified shape.

Example

This example adds a rectangle to myDocument, adds text to the rectangle, and sets the margins for the text frame.

Set myDocument = ActiveDocument
With myDocument.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140).TextFrame
    .TextRange.Text = "Here is some test text"
    .MarginBottom = 0
    .MarginLeft = 100
    .MarginRight = 0
    .MarginTop = 20
End With