TextRange オブジェクト (PowerPoint)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

指定した図形のtextrangeオブジェクトを取得するのにには、 TextFrame オブジェクトのtextrangeプロパティを使用します。Use the TextRangeproperty of the TextFrame object to return a TextRange object for any shape you specify. TextRange オブジェクトのテキストの文字列を取得するには、 Text プロパティを使用します。Use the Textproperty to return the string of text in the TextRange object. 次の使用例は、myDocument に四角形を追加し、その中に含めるテキストを設定します。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"

Text プロパティは、 TextRange オブジェクトの既定のプロパティであるため、次の 2 つのステートメントでは、同じ結果が得られます。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"

HasTextFrameプロパティを使用して、図形にテキストフレームがあるかどうかを確認し、 HasTextプロパティを使用して、テキストフレームにテキストが含まれているかどうかを判断します。Use the HasTextFrameproperty to determine whether a shape has a text frame, and use the HasTextproperty to determine whether the text frame contains text.

現在選択されているテキストを取得するには、 TextRange オブジェクトの Selection プロパティを使用します。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

TextRange オブジェクトのテキストの一部を取得するには、 CharactersLinesParagraphsRunsSentencesWords のいずれかのメソッドを使用します。Use one of the following methods to return a portion of the text of a TextRange object: Characters, Lines, Paragraphs, Runs, Sentences, or Words.

テキスト範囲のテキストを検索して置換するには、 findメソッドとreplaceメソッドを使用します。Use the Findand Replacemethods to find and replace text in a text range.

TextRangeオブジェクトに文字を挿入するには、InsertAfterinsertbeforeinsertbeforeInsertSlideNumberinsertbeforeのいずれかのメソッドを使用します。Use one of the following methods to insert characters into a TextRange object:InsertAfter, InsertBefore, InsertDateTime, InsertSlideNumber, or InsertSymbol.

メソッドMethods

名前Name
AddPeriodsAddPeriods
ChangeCaseChangeCase
CharactersCharacters
CopyCopy
CutCut
DeleteDelete
FindFind
InsertAfterInsertAfter
InsertBeforeInsertBefore
InsertDateTimeInsertDateTime
InsertSlideNumberInsertSlideNumber
InsertSymbolInsertSymbol
LinesLines
LtrRunLtrRun
ParagraphsParagraphs
PastePaste
PasteSpecialPasteSpecial
RemovePeriodsRemovePeriods
ReplaceReplace
RotatedBoundsRotatedBounds
RtlRunRtlRun
RunsRuns
SelectSelect
SentencesSentences
TrimTextTrimText
WordsWords

プロパティProperties

NameName
ActionSettingsActionSettings
アプリケーションApplication
BoundHeightBoundHeight
BoundLeftBoundLeft
BoundTopBoundTop
BoundWidthBoundWidth
CountCount
フォントFont
IndentLevelIndentLevel
LanguageIDLanguageID
LengthLength
ParagraphFormatParagraphFormat
ParentParent
StartStart
TextText

関連項目See also

PowerPoint オブジェクト モデル リファレンスPowerPoint Object Model Reference

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.