TextRange.Text Property

Returns or sets a String that represents the text in a text range or WordArt shape. Read/write.

Syntax

expression.Text

expression   A variable that represents a TextRange object.

Example

The following example adds a rectangle to the active publication and adds text to it.

  Sub AddTextToShape()
    With ActiveDocument.Pages(1).Shapes.AddShape(Type:=msoShapeRectangle, _
        Left:=72, Top:=72, Width:=250, Height:=140)
        .TextFrame.TextRange.Text = "Here is some test text"
    End With
End Sub

See Also

• TextRange Object
• TextRange Object Members