TextRange 对象 (PowerPoint) | Microsoft Learn

昵称163835 2022-12-14 发布于广东

展开全文

TextRange 对象 (PowerPoint)

项目
2022/04/07

包含附加到形状的文本，以及用于操作文本的属性和方法。

备注

以下示例说明如何执行下列操作：

返回任意指定形状中的文本范围。
返回选定范围中的文本范围。
返回文本范围中的特定字符、单词、行、句子或段落。
查找和替换文本范围内的文本。
向文本范围中插入文本、日期和时间或幻灯片编号。
将光标定位到文本范围内所需的任意位置。

示例

使用 TextRange TextFrame 的属性返回任意指定的形状的 TextRange 对象的对象。使用 Text 属性可返回 TextRange 对象中的文本字符串。以下示例向 myDocument 中添加一个矩形并设置其包含的文本。

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140) _

    .TextFrame.TextRange.Text = 'Here is some test text'

Text 属性是 TextRange 对象的默认属性，因为以下两个语句是等效的。

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属性属性可确定文本框架中是否包含文本。

使用 Selection 对象的 TextRange 属性返回当前选定的文本。下面的示例将选定内容复制到剪贴板。

ActiveWindow.Selection.TextRange.Copy

使用下列方法之一来返回 TextRange 对象的文本的某个部分︰字符行 的段落 运行 的句子 或多个单词.

使用查找和替换若要查找和替换文本范围内的文本的方法。

使用下列方法之一将字符插入 TextRange 对象︰新段落活动 InsertDateTime InsertSlideNumber或 InsertSymbol.

方法

名称
AddPeriods
ChangeCase
Characters
Copy
Cut
删除
Find
InsertAfter
InsertBefore
InsertDateTime
InsertSlideNumber
InsertSymbol
线条
LtrRun
Paragraphs
Paste
PasteSpecial
RemovePeriods
Replace
RotatedBounds
RtlRun
运行
Select
Sentences
TrimText
Words