在大纲视图中,将指定区域中各段移至下一个可见段落之后或上一个可见段落之前。
语法
表达式.Relocate(Direction)
表达式 必选。一个代表 Range 对象的变量。
参数
名称 |
必选/可选 |
数据类型 |
说明 |
Direction |
必选 |
WdRelocate |
移动的方向。 |
说明
仅当正文文本在大纲视图中已经折叠或是该区域的一部分时,正文文本才与标题同时移动。
示例
本示例将活动文档的第三、四、五段移至下一段(第六段)之后。
示例代码 |
let theStart = ActiveDocument.Paragraphs.Item(3).Range.Start
let theEnd = ActiveDocument.Paragraphs.Item(5).Range.End
let myRange = ActiveDocument.Range(theStart, theEnd)
ActiveDocument.ActiveWindow.View.Type = wdOutlineView
myRange.Relocate(wdRelocateDown)
|
本示例将选定区域的首段移至上一段之前。
示例代码 |
ActiveDocument.ActiveWindow.View.Type = wdOutlineView
Selection.Paragraphs.Item(1).Range.Relocate(wdRelocateUp)
|