应用于 Range 和 Selection 对象的 Move 方法。
将指定区域或所选内容折叠到开始或结束位置,然后将折叠的对象移动指定数量的单位。本方法返回的 Long 值表明对象实际移动的单位数。如果移动失败,则本方法返回 0(零)。
expression.Move(Unit, Count)
expression 必需。该表达式返回以上一个对象。
Unit Variant 类型,可选。折叠的区域或所选内容移动的单位。可以是下列 WdUnits 常量之一:wdCharacter、wdWord、wdSentence、wdParagraph、wdSection、wdStory、wdCell、wdColumn、wdRow 或 wdTable。如果 expression 返回 Selection 对象,则也可以使用 wdLine。默认值为 wdCharacter。
Count Variant 类型,可选。指定的区域或所选内容移动的单位数。如果 Count 是一个正数,则对象折叠到结束位置,并在文档中向前移动指定的单位数;如果 Count 是一个负数,则对象折叠到开始位置,并向后移动指定的单位数。默认值是 1。在使用 Move 方法之前也可以使用 Collapse 方法控制折叠的方向。如果区域或所选内容位于一个单位的中间,或者不能折叠,则将区域或所选内容向前或向后移动整个的单位。
折叠的区域或所选内容的开始和结束位置相同。
将 Move 方法应用于一个区域并不重新排列文档中的文字,取而代之的是,这个方法重新定义区域,以引用文档中的一个新位置。
如果将 Move 方法应用于不是 Range 对象变量(例如,Selection.Paragraphs(3).Range.Move
)的任何区域,则本方法不起作用。
移动一个 Selection 对象会折叠所选内容,并将插入点在文档中向前或向后移动。
应用于 Application 和 Task 对象的 Move 方法。
设置任务窗口或活动文档窗口的位置。
expression.Move(Left, Top)
expression 必需。该表达式返回以上一个对象。
Left Long 类型,必需。指定窗口的水平屏幕位置。
Top Long 类型,必需。指定窗口的垂直屏幕位置。
将样式表的优先顺序。
expression.Move(Precedence)
expression 必需。该表达式返回一个 StyleSheet 对象。
Precedence WdStyleSheetPrecedence,必需。优先级别。
WdStyleSheetPrecedence 可以是下列 WdStyleSheetPrecedence 常量之一: |
wdStyleSheetPrecedenceHigher |
wdStyleSheetPrecedenceHighest |
wdStyleSheetPrecedenceLower |
wdStyleSheetPrecedenceLowest |
本示例启动“计算器”应用程序 (Calc.exe),并使用 Move 方法重新定位应用程序窗口。
Shell "Calc.exe"
With Tasks("Calculator")
.WindowState = wdWindowStateNormal
.Move Top:=50, Left:=50
End With
本示例将 Range1
设置为活动文档的第一个段落,然后将该区域向前移动三个段落。在该宏运行之后,插入点将位于第四个段落的开头。
Set Range1 = ActiveDocument.Paragraphs(1).Range
With Range1
.Collapse Direction:=wdCollapseStart
.Move Unit:=wdParagraph, Count:=3
.Select
End With
本示例将所选内容向右移动两个单词,并将插入点放在第二个单词后的空格处。如果移动失败,则会显示一个消息框,表明所选内容位于文档的末尾。
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