Método Table.SortDescending (Word)
Classifica linhas da tabela em ordem alfanumérica decrescente.
Sintaxe
expression. SortDescending
expression é obrigatório. Uma variável que representa um objeto 'Table'.
Comentários
A primeira linha da tabela é considerada um registro de cabeçalho e não está incluída na lista Classificar. Use o método Sort para incluir o registro de cabeçalho em uma classificação.
Esse método oferece uma forma simplificada de classificação adequada para fontes de dados de mala direta que contenham colunas de dados. Para a maioria das tarefas de classificação, use o método Sort.
Exemplo
Este exemplo cria uma tabela 5x5 em um novo documento, insere texto em cada célula e classifica a tabela em ordem alfanumérica decrescente.
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
Este exemplo classifica em ordem alfanumérica decrescente a tabela que contém o ponto de inserção.
If Selection.Information(wdWithInTable) = True Then
Selection.Tables(1).SortDescending
Else
MsgBox "The insertion point is not in a table."
End If
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.