MoveEnd 方法

       

移动区域或所选内容的结束字符位置。本方法如果返回一个整数,表示区域或所选内容所移动的单元数;如果返回 0,则移动失败。

expression.MoveEnd(Unit, Count)

expression   必需。该表达式返回一个 RangeSelection 对象。

Unit   可选,WdUnits。结束字符位置移至的单元。

Count   Variant 类型,可选。指移动的单元数。如果为正数,则结束字符在文档中向后移动;如果为负数,则结束字符向前移动。如果结束位置已移至起始位置,则折叠该区域并移动首末两个字符的位置。

示例

本示例将所选内容结尾后移一个字符(即将所选区域缩小一个字符)。空格算作一个字符。

Selection.MoveEnd Unit:=wdCharacter, Count:=-1

本示例将所选内容的结尾移至行尾(即将所选区域扩展到行尾)。

Selection.MoveEnd Unit:=wdLine, Count:=1

本示例将活动文档的第二个单词赋给 myRange。使用 MoveEnd 方法将 myRange(一个 range 对象)前移一个字符。运行该宏后,选定第二个和第三个单词。

If ActiveDocument.Words.Count >= 3 Then
    Set myRange = ActiveDocument.Words(2)
    With myRange
        .MoveEnd Unit:=wdWord, Count:=1
        .Select
    End With
End If