Question

返回一个代表指定文本域子集的TextRange 对象。一个文本域由具有相同字体属性的一批字符组成。有关计算或浏览文本区域中域的详细信息，请参阅TextRange 对象。

expression.Runs(Start,Length)

expression必选。该表达式返回一个TextRange 对象。

Start可选。Long 类型。返回的文本区域的第一个域。

Length可选。Long 类型。要返回的域的数量。

说明

如果省略Start 参数和Length 参数，返回的内容为指定文本区域的第一个域到最后一段。

如果指定Start 参数但省略Length 参数，返回的内容含有一个域。

如果指定Length 参数但省略Start 参数，返回的内容从指定文本区域的第一个域开始。

如果Start 参数大于指定文本中域的数量，返回的内容从指定文本区域的最后一个域开始。

如果Length 参数大于从指定的起始域到文本末尾的域数量，则返回的内容包含所有这些域。

一个域包含从字体改变后的第一个字符到倒数第二个具有相同字体属性的字符之间的所有字符。以下句为例：

Thisitalic word is notbold.

在上句中，如果“This”后边的空格不是斜体，则第一个域由“This”构成（如果该空格为斜体，则第一个域仅包括前三个字符，即“Thi”）。类似地，仅当“italic”后边的空格为斜体时，第二个域由“italic”构成。

示例

如果当前演示文稿的第一张幻灯片第二个形状中第二个域已经设为倾斜，则本示例将其设为加粗。

With Application.ActivePresentation.Slides(1).Shapes(2) _
 .TextFrame.TextRange
 With .Runs(2).Font
 If .Italic Then
 .Bold = True
 End If
 End With
End With