Word VBA教程:MoveRight方法

将所选内容向右移动,并返回移动距离的单位数。

expression.MoveRight(Unit, Count, Extend)

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

Unit   WdUnits,可选。所选内容移动距离的度量单位。

        可以是下列 WdUnits 常量。

        wdCell

        wdCharacter

        wdWord

        wdSentence

默认值为 wdCharacter。

Count   Variant 类型,可选。所选内容移动距离的单位数。默认值是 1。

Extend   Variant 类型,可选。可以是 wdMove 或 wdExtend。如果为 wdMove,则所选内容折叠到结束位置,并向右移动。如果为 wdExtend,则所选内容向右扩展。默认值是 wdMove。

说明

如果 Unit 为 wdCell,则 Extend参数只能是 wdMove。

VBA示例

本示例将所选内容移至前一个域之前,然后选定该域。


With Selection
    Set MyRange = .GoTo(wdGoToField, wdGoToPrevious)
    .MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend
    If Selection.Fields.Count = 1 Then Selection.Fields(1).Update
End With

本示例将所选内容向右移动一个字符。如果移动成功,则 MoveRight方法返回 1。


If Selection.MoveRight = 1 Then MsgBox "Move was successful"

本示例将所选内容移至表格的下一个单元格。


If Selection.Information(wdWithInTable) = True Then
    Selection.MoveRight Unit:=wdCell, Count:=1, Extend:=wdMove
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号