通过

TextRange.Characters 方法 (PowerPoint)

  • 项目

返回一个 TextRange 对象，该对象代表指定的文本字符子集。 有关计算或浏览一段文本中的字符的详细信息，请参阅 TextRange 对象。

语法

expression. Characters( _Start_, _Length_ )

表达 一个代表 TextRange 对象的变量。

参数

名称 必需/可选 数据类型 说明
Start 可选 Long 返回的范围中的第一个字符。
Length 可选 Long 要返回的字符数。

返回值

TextRange

备注

如果同时省略 Start 和 Length，则返回的范围从指定范围中的第一个字符开始到最后一段结束。

如果指定 Start 但省略 Length，则返回的范围包含一个字符。

如果指定 Length 但省略 Start，则返回的范围从指定范围中的第一个字符开始。

如果 Start 大于指定文本中的字符数，则返回的范围将从指定范围中的最后一个字符开始。

如果 Length 大于从指定的开始字符到文本末尾的字符数，则返回的范围将包含所有这些字符。

示例

本示例设置当前演示文稿中第一张幻灯片的第二个形状的文本，并将第二个字符设为偏移 20% 的下标。

Dim charRange As TextRange

With Application.ActivePresentation.Slides(1).Shapes(2)

    Set charRange = .TextFrame.TextRange.InsertBefore("H2O")

    charRange.Characters(2).Font.BaselineOffset = -0.2

End With

本示例会将第一张幻灯片上第二个形状的所有下标字符设为加粗。

With Application.ActivePresentation.Slides(1).Shapes(2) _
    .TextFrame.TextRange

    For i = 1 To .Characters.Count

        With .Characters(i).Font

            If .Subscript Then .Bold = True

        End With

    Next

End With

另请参阅

TextRange 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。