Classificar automaticamente dados de três colunas.
Enviado: 20 Jan 2020 às 16:34
Estou a elaborar uma planilha com três colunas, sendo que a coluna A é a sequência numérica, que é preenchida automaticamente quando digito o nome de pessoas na coluna. Usei a seguinte função:=SE(B9="";"";(LIN(A9)-8)) . Esta parte está resolvida. OK!
A coluna B é a coluna dos nomes dos candidatos e que é à medida que vou digitando os nomes eles vão se organizando automaticamente em ordem alfabética. Consegui com da Macro abaixo elaborada pela Karine Lago, fiz a adaptações necessárias para minha necessidade em minha planilha.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Application.Intersect(Worksheets(1).Range("a1:d500"), Target) Is Nothing) Then
Classificar
End If
End Sub
Private Sub Classificar()
Worksheets(1).Range("a2:d500").Sort Key1:=Worksheets(1).Range("d2"), Order1:=xlDescending, _
Key2:=Worksheets(1).Range("a2"), Order1:=x1Ascending
End Sub
Na coluna "C" será digitado O MOTIVO DA DESCLASSIFICAÇÃO do candidato. E é neste caso que está minha dificuldade, pois o motivo deve seguir o nome do candidato para quaisquer posição da ordem alfabética, da coluna B.
Não estou conseguindo resolver este problema.
Tem alguma fórmula ou macro ou função, que eu possa fazer isso?
A coluna B é a coluna dos nomes dos candidatos e que é à medida que vou digitando os nomes eles vão se organizando automaticamente em ordem alfabética. Consegui com da Macro abaixo elaborada pela Karine Lago, fiz a adaptações necessárias para minha necessidade em minha planilha.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not (Application.Intersect(Worksheets(1).Range("a1:d500"), Target) Is Nothing) Then
Classificar
End If
End Sub
Private Sub Classificar()
Worksheets(1).Range("a2:d500").Sort Key1:=Worksheets(1).Range("d2"), Order1:=xlDescending, _
Key2:=Worksheets(1).Range("a2"), Order1:=x1Ascending
End Sub
Na coluna "C" será digitado O MOTIVO DA DESCLASSIFICAÇÃO do candidato. E é neste caso que está minha dificuldade, pois o motivo deve seguir o nome do candidato para quaisquer posição da ordem alfabética, da coluna B.
Não estou conseguindo resolver este problema.
Tem alguma fórmula ou macro ou função, que eu possa fazer isso?