TextRange Object (PowerPoint)
Contains the text that's attached to a shape, and properties and methods for manipulating the text.
The following examples describe how to:
Return the text range in any shape you specify.
Return a text range from the selection.
Return particular characters, words, lines, sentences, or paragraphs from a text range.
Find and replace text in a text range.
Insert text, the date and time, or the slide number into a text range.
Position the cursor wherever you want in a text range.
Use the TextRange property of the TextFrame object to return a TextRange object for any shape you specify. Use the Text property to return the string of text in the TextRange object. The following example adds a rectangle to myDocument and sets the text it contains.
Set myDocument = ActivePresentation.Slides(1) myDocument.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140) _ .TextFrame.TextRange.Text = "Here is some test text"
Because the Text property is the default property of the TextRange object, the following two statements are equivalent.
ActivePresentation.Slides(1).Shapes(1).TextFrame _ .TextRange.Text = "Here is some test text" ActivePresentation.Slides(1).Shapes(1).TextFrame _ .TextRange = "Here is some test text"
Use the TextRange property of the Selection object to return the currently selected text. The following example copies the selection to the Clipboard.