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.