本示例将选定内容折叠为位于结尾处的插入点,然后选定插入点所在的列。

Selection.Collapse Direction:=wpsCollapseEnd
Selection.SelectColumn