Word VBA教程:MoveEnd方法

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

expression.MoveEnd(Unit, Count)

expression   必需。该表达式返回一个 Range 或 Selection对象。

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

        可以是下列 WdUnits 常量之一:

        wdCharacter

        wdWord

        wdSentence

        wdParagraph

        wdSection

        wdStory

        wdCell

        wdColumn

        wdRow

         wdTable。

  如果表达式的返回值是 Selection对象,也可以使用 wdLine。默认值为 wdCharacter。

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

VBA示例

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


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号