Muokkaa

Jaa


TextRange object (PowerPoint)

Contains the text that's attached to a shape, and properties and methods for manipulating the text.

Remarks

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.

Example

Use the TextRangeproperty of the TextFrame object to return a TextRange object for any shape you specify. Use the Textproperty 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 HasTextFrameproperty to determine whether a shape has a text frame, and use the HasTextproperty to determine whether the text frame contains text.

Use the TextRange property of the Selection object to return the currently selected text. The following example copies the selection to the Clipboard.

ActiveWindow.Selection.TextRange.Copy

Use one of the following methods to return a portion of the text of a TextRange object: Characters, Lines, Paragraphs, Runs, Sentences, or Words.

Use the Findand Replacemethods to find and replace text in a text range.

Use one of the following methods to insert characters into a TextRange object:InsertAfter, InsertBefore, InsertDateTime, InsertSlideNumber, or InsertSymbol.

Methods

Name
AddPeriods
ChangeCase
Characters
Copy
Cut
Delete
Find
InsertAfter
InsertBefore
InsertDateTime
InsertSlideNumber
InsertSymbol
Lines
LtrRun
Paragraphs
Paste
PasteSpecial
RemovePeriods
Replace
RotatedBounds
RtlRun
Runs
Select
Sentences
TrimText
Words

Properties

Name
ActionSettings
Application
BoundHeight
BoundLeft
BoundTop
BoundWidth
Count
Font
IndentLevel
LanguageID
Length
ParagraphFormat
Parent
Start
Text

See also

PowerPoint Object Model Reference

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.