将某一区域或所选内容折叠到起始位置或结束位置。折叠之后起始位置和结束位置相同。
expression.Collapse(Direction)
expression 必需。该表达式返回一个 Range 或 Selection 对象。
Direction Variant 类型,可选。指折叠某区域或所选内容的方向。可以是下列 WdCollapseDirection 常量之一:wdCollapseEnd 或 wdCollapseStart。默认值为 wdCollapseStart。
如果用 wdCollapseEnd 折叠一个代表完整段落的区域,则该区域将定位于段落结束标记之后(即下段开头)。但是,在该区域折叠后,可以用 MoveEnd 方法将区域回移一个字符。如下例所示:
Set myRange = ActiveDocument.Paragraphs(1).Range
myRange.Collapse Direction:=wdCollapseEnd
myRange.MoveEnd Unit:=wdCharacter, Count:=-1
本示例将所选内容折叠为选定部分的开头。
Selection.Collapse Direction:=wdCollapseStart
本示例将 myRange
设置为代表活动文档内容区域,折叠 myRange
,然后在文档的最后插入一个 2x2 表格。
Set myRange = ActiveDocument.Content
myRange.Collapse Direction:=wdCollapseEnd
ActiveDocument.Tables.Add Range:=myRange, NumRows:=2, NumColumns:=2