Word) (Range.Relocate 方法
在大綱模式中,將指定範圍內的段落移至下一個可見段落之後或上一個可見段落之前。
語法
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 支援與意見反應。