Como ordenar datas automaticamente ao inserir ou alterar no Excel?

No Excel, a função Classificar pode ajudá-lo a ordenar datas em ordem crescente ou decrescente conforme necessário. No entanto, ela não é dinâmica; se você já tiver classificado as datas e depois adicionar uma nova data, precisará classificá-la novamente. Existem boas maneiras rápidas de autoordenar datas ao inserir novos dados cada vez em uma planilha?

Ordenação automática de datas quando uma data é inserida ou alterada com fórmula

Ordenação automática de datas quando uma data é inserida ou alterada com código VBA

Ordenação automática de datas quando uma data é inserida ou alterada com fórmula

Por exemplo, se as datas originais estiverem na Coluna A, a seguinte fórmula pode ajudá-lo a autoordenar as datas ou qualquer outra sequência de texto em uma nova coluna auxiliar com base na coluna que deseja classificar. Por favor, siga estas etapas:

1. Insira esta fórmula:

=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&$A$2:$A$15),0)) em uma célula em branco ao lado da sua coluna de datas, C2, por exemplo, e pressione Ctrl + Shift + Enter juntos para obter uma sequência numérica. Em seguida, arraste a alça de preenchimento para baixo até as células desejadas. Veja a captura de tela:

Observação: Na fórmula acima: A2:A15 é o intervalo de datas original que você deseja ordenar automaticamente.

2. Em seguida, formate os números como formato de data clicando em Data Curta na lista suspensa Geral na guia Página Inicial, veja a captura de tela:

3. Os números de sequência agora foram convertidos para o formato de data, e as datas originais também foram classificadas. Veja a captura de tela:

4. A partir de agora, quando você inserir ou alterar uma data na coluna A, as datas na coluna C serão classificadas automaticamente em ordem crescente. Veja a captura de tela:

Ordenação automática de datas quando uma data é inserida ou alterada com código VBA

O seguinte código VBA pode ajudá-lo a ordenar automaticamente as datas na coluna original quando você inserir ou alterar uma data conforme necessário.

1. Vá para a planilha onde deseja ordenar automaticamente as datas ao inserir ou alterar uma data.

2. Clique com o botão direito do mouse na guia da planilha e selecione Visualizar Código no menu de contexto. Na janela Microsoft Visual Basic for Applications que aparece, copie e cole o seguinte código na janela Módulo em branco. Veja a captura de tela:

Código VBA: ordenação automática quando uma data é inserida ou alterada:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Application.Intersect(Target, Application.Columns(1)) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, _
                                        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Observação: No código acima, as datas inseridas serão ordenadas automaticamente na coluna A. Você pode alterar A1 e A2 para suas próprias células conforme necessário.

3. A partir de agora, quando você inserir uma data na coluna A, as datas serão classificadas automaticamente em ordem crescente.