选定包含插入点的列,或者选定包含所选内容的所有列。如果所选内容不在表格中,则会导致错误。
expression.SelectColumn
expression 必需。该表达式返回一个 Selection 对象。
本示例将选定内容折叠为位于结尾处的插入点,然后选定插入点所在的列。
Selection.Collapse Direction:=wdCollapseEnd
If Selection.Information(wdWithInTable) = True Then
Selection.SelectColumn
End If