Extend 方法

启用扩展模式（将 ExtendMode 属性设为 True），或如果已经启用了扩展模式，将选定内容扩展至下一个较大的文本单元。选定文本单元的级别是：单词、句、段落、节和整篇文档。

如果指定了 Character，则扩展选定内容至指定字符下一次出现的位置。通过移动选定内容的活动结尾来扩展选定内容。

expression   必需。该表达式返回“应用于”列表中的一个对象。

Character  Variant 类型，可选。扩展选定内容的字符。本参数区分大小写并且要取 String 类型的值，否则出错。另外，如果本参数的值不止一个字符，则 Microsoft Word 完全忽略命令。

示例

本示例将当前的选定内容折叠为一个插入点，并选择当前的语句。

With Selection
    ' Collapse current selection to insertion point.
    .Collapse
    ' Turn extend mode on.
    .Extend
    ' Extend selection to word.
    .Extend
    ' Extend selection to sentence.
    .Extend
End With

下面是不使用 Extend 方法完成同样任务的示例。

With Selection
    ' Collapse current selection.
    .Collapse
    ' Expand selection to current sentence.
    .Expand Unit:=wdSentence
End With

本示例激活选定内容的结尾并将选定内容扩展至下一个以“R”开头的实例。

With Selection
    .StartIsActive = False
    .Extend Character:="R"
End Wit