Compartilhar via


SortFields.Add method (Excel)

Cria um novo campo de classificação e retorna um objeto SortFields.

Sintaxe

expressão. Adicionar (Chave, Ordenação, Encomenda, CustomOrder, DataOption)

expressão Uma variável que representa um objeto SortFields .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Tecla Obrigatório Range Especifica um valor de tecla para a classificação.
SortOn Opcional Variant Um valor XlSortOn que especifica a propriedade de uma célula a utilizar para a ordenação.
Order Opcional Variant Um valor XlSortOrder que especifica a sequência de ordenação.
CustomOrder Opcional Variant Especifica se uma ordem de classificação personalizada deve ser usada.
DataOption Opcional Variant Um valor XlSortDataOption que especifica como ordenar texto.

Valor de retorno

SortField

Comentários

Esta API não inclui suporte para tipos de dados, como Geografia ou Ações. Para definir uma sequência de ordenação baseada num SubCampo de um destes tipos, veja o método Add2 .

Exemplo

Este exemplo ordena uma tabela, Tabela1 na Folha1, por Coluna1 por ordem ascendente.

O método Clear é chamado antes para garantir que a ordenação anterior é limpa para que uma nova possa ser aplicada.

O objeto Ordenar é chamado para aplicar a ordenação adicionada à Tabela1.

ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Add _
 Key:=Range("Table1[[#All],[Column1]]"), _
 SortOn:=xlSortOnValues, _
 Order:=xlAscending, _
 DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort
 .Header = xlYes
 .MatchCase = False
 .Orientation = xlTopToBottom
 .SortMethod = xlPinYin
 .Apply
End With

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.