Range.Relocate 方法 (Word)
在大纲视图中,将指定区域中各段移至下一个可见段落之后或上一个可见段落之前。
语法
expression。 Relocate
( _Direction_
)
expression 是必需的。 一个代表 Range 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Direction | 必需 | WdRelocate | 移动的方向。 |
备注
仅当正文文本在大纲视图中已经折叠或是该区域的一部分时,正文文本才与标题同时移动。
示例
本示例将活动文档的第三、四、五段移至下一段(第六段)之后。
theStart = ActiveDocument.Paragraphs(3).Range.Start
theEnd = ActiveDocument.Paragraphs(5).Range.End
Set myRange = ActiveDocument.Range(Start:=theStart, End:=theEnd)
ActiveDocument.ActiveWindow.View.Type = wdOutlineView
myRange.Relocate Direction:=wdRelocateDown
本示例将选定区域的首段移至上一段之前。
ActiveDocument.ActiveWindow.View.Type = wdOutlineView
Selection.Paragraphs(1).Range.Relocate Direction:=wdRelocateUp
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。