Selection.Move 方法 (Word)

将指定的所选内容折叠到其起始位置或结束位置，然后将折叠的对象移动指定的单位数。 此方法返回一个 Long 类型，表示的单位移动所选内容，如果移动不成功，则返回 0 (零)。

语法

expression。 Move( _Unit_ , _Count_ )

expression 是必需的。 表示 Selection 对象的变量。

参数

名称	必需/可选	数据类型	说明
Unit	可选	WdUnits	移动结束字符位置时所基于的单位。
Count	可选	Variant	指定的区域或所选内容的移动的单位数。 如果 Count 是一个正数，对象折叠到其结束位置，并在文档中向后移动指定的单位数。 如果 Count 是一个负数，对象折叠到其起始位置，并向前移动指定的单位数。 默认值为 1。 您还可以使用 Move 方法之前使用 折叠 方法控制的折叠方向。 如果该区域或所选内容位于一个单位的中间，或者不能折叠，将其移动到的开头或结尾的部门计为移动它一个完整的单元。

返回值

Long

备注

折叠的范围或所选内容的开始和结束位置相同。

对一个范围应用 Move 方法不会重排文档中的文本。 相反，它重新定义该区域，以引用文档中的新位置。

如果将 Move 方法应用于 除 Range 对象变量以外的任何范围， (例如 Selection.Paragraphs(3).Range.Move ，) ，则该方法不起作用。

移动 所选内容 对象折叠所选内容，将插入点在文档中向后或向前移动。

示例

以下示例将所选内容向右移动两个单词，并将插入点放在第二个单词的尾部空格后。 如果移动失败，则会显示一个消息框，表明所选内容位于文档的末尾。

If Selection.StoryType = wdMainTextStory Then 
 wUnits = Selection.Move(Unit:=wdWord, Count:=2) 
 If wUnits < 2 Then _ 
 MsgBox "Selection is at the end of the document" 
End If

以下示例将所选内容在表格中向前移动三个单元格。

If Selection.Information(wdWithInTable) = True Then 
 Selection.Move Unit:=wdCell, Count:=3 
End If

另请参阅

Selection 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。