TextFrame Object
Description
Represents the text frame in a Shape object. Contains the text in the text frame as well as the properties and methods that control the alignment and anchoring of the text frame.
Using the TextFrame Object
Use the TextFrame property to return a TextFrame object. The following example adds a rectangle to myDocument, adds text to the rectangle, and then sets the margins for the text frame.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140) _
.TextFrame
.TextRange.Text = "Here is some test text"
.MarginBottom = 10
.MarginLeft = 10
.MarginRight = 10
.MarginTop = 10
End With
Use the HasTextFrame property to determine whether a shape has a text frame, and use the HasText property to determine whether the text frame contains text, as shown in the following example.
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
If s.HasTextFrame Then
With s.TextFrame
If .HasText Then MsgBox .TextRange.Text
End With
End If
Next
Properties
Application property, AutoSize property, Creator property, HasText property, HorizontalAnchor property, MarginBottom property, MarginLeft property, MarginRight property, MarginTop property, Orientation property, Parent property, Ruler property, TextRange property, VerticalAnchor property, WordWrap property.
Methods
DeleteText method.