本示例将选定内容折叠至开始位置,然后选定插入点所在的行。

Selection.Collapse Direction:=wpsCollapseStart
Selection.SelectRow