SortDescending 方法

以字母降序排列段落或表格行。将第一段或表格第一行视为域名记录，不进行排序。可用 Sort 方法将域名记录包含在排序中。

注意   此方法为含有数据列的邮件合并数据源排序提供一种简化形式。对于大多数排序，请使用 Sort 方法。

expression   必需。该表达式返回一个 Range、Selection 或 Table 对象。

示例

本示例在新文档中创建一张 5 x 5 表格，将文本插入每个单元格，然后以字母降序排列表格。

Set newDoc = Documents.Add
Set myTable = _
    newDoc.Tables.Add(Range:=Selection.Range, NumRows:=5, _
    NumColumns:=5)
For iRow = 1 To myTable.Rows.Count
    For iCol = 1 To myTable.Columns.Count
        Set MyRange = myTable.Rows(iRow).Cells(iCol).Range
        MyRange.InsertAfter "Cell" & Str$(iRow) & "," & Str$(iCol)
    Next iCol
Next iRow
MsgBox "Click OK to sort in descending order."
myTable.SortDescending

本示例以字母降序排列插入点所在的表格。

If Selection.Information(wdWithInTable) = True Then 
    Selection.Tables(1).SortDescending
Else
    MsgBox "The insertion point is not in a table."
End If