Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Classifica um intervalo de valores.
Sintaxe
mais simples. Sort (Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)
expressão Uma variável que representa um objeto de Intervalo.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Key1 | Opcional | Variant | Especifica o primeiro campo de classificação, como um nome de intervalo (String) ou um objeto de intervalo ; Determina os valores a serem classificados. |
| Order1 | Opcional | XlSortOrder | Determina a ordem de classificação para os valores especificados na Chave1. |
| Key2 | Opcional | Variant | Segundo campo de classificação; não pode ser usado durante a classificação de uma Tabela Dinâmica. |
| Type | Opcional | Variant | Especifica o tipo de elementos a serem classificados em uma Tabela Dinâmica. Especifique xLSortLabels para classificar pelos rótulos direcionados pela expansãoIntervalo nas áreas de Rótulos de Linha/Coluna do intervalo da Tabela Dinâmica ou xLSortValues quando Key1 tiver como destino adicional uma célula nas áreas Valores ou Sub/Totais Gerais usando a notação R1C1. |
| Order2 | Opcional | XlSortOrder | Determina a ordem de classificação dos valores especificados na Chave2. |
| Key3 | Opcional | Variant | Terceiro campo de classificação; não pode ser usado durante a classificação de uma Tabela Dinâmica. |
| Order3 | Opcional | XlSortOrder | Determina a ordem de classificação para os valores especificados na Chave3. |
| Header | Opcional | XlYesNoGuess | Especifica se a primeira linha contém informações de cabeçalho. xlNo é o valor padrão; você pode especificar xlGuess se desejar que o Excel tente determinar o cabeçalho. |
| OrderCustom | Opcional | Variant | Especifica um deslocamento de inteiro baseado em um na lista de ordens de classificação personalizadas. |
| MatchCase | Opcional | Variant | Defina como True para executar uma classificação que diferencie maiúsculas de minúsculas, False para executar uma classificação que não diferencie maiúsculas de minúsculas; não pode ser usado com Tabelas Dinâmicas. |
| Orientation | Opcional | XlSortOrientation | Especifica se a classificação deve ser a coluna ou linha (padrão). Defina o valor xlSortColumns como 1 para classificar por coluna. Defina o valor xlSortRows como 2 para classificar por linha (esse é o valor padrão). |
| SortMethod | Opcional | XlSortMethod | Especifica o método de classificação. |
| DataOption1 | Opcional | XlSortDataOption | Especifica como classificar o texto no intervalo especificado em Key1; não se aplica à classificação de Tabela Dinâmica. |
| DataOption2 | Opcional | XlSortDataOption | Especifica como classificar o texto no intervalo especificado na Chave2; não se aplica à classificação de Tabela Dinâmica. |
| DataOption3 | Opcional | XlSortDataOption | Especifica como classificar o texto no intervalo especificado em Key3; não se aplica à classificação de Tabela Dinâmica. |
Valor de retorno
Variant
Exemplo
Este exemplo obtém o valor da cor de uma célula na coluna A usando a propriedade ColorIndex e, em seguida, usa esse valor para classificar o intervalo por cor.
Sub ColorSort()
'Set up your variables and turn off screen updating.
Dim iCounter As Integer
Application.ScreenUpdating = False
'For each cell in column A, go through and place the color index value of the cell in column C.
For iCounter = 2 To 55
Cells(iCounter, 3) = _
Cells(iCounter, 1).Interior.ColorIndex
Next iCounter
'Sort the rows based on the data in column C
Range("C1") = "Index"
Columns("A:C").Sort key1:=Range("C2"), _
order1:=xlAscending, header:=xlYes
'Clear out the temporary sorting value in column C, and turn screen updating back on.
Columns(3).ClearContents
Application.ScreenUpdating = True
End Sub
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.