TextRange.Characters 方法 (Publisher)

返回一个 TextRange 对象,该对象代表指定的文本字符子集。

语法

表达式字符 (开头长度)

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

参数

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

返回值

TextRange

备注

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

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

示例

本示例设置当前文档中第一页上的第一个形状的文字,然后将前两个字符设置为字号 15 磅,加粗字体。

Sub CharRange() 
 Dim rngCharacters As TextRange 
 Set rngCharacters = Application.ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.InsertBefore(NewText:="Hello World.") 
 With rngCharacters.Characters(Start:=1, Length:=2).Font 
 .Size = 15 
 .Bold = msoTrue 
 End With 
End Sub

支持和反馈

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