Galera, Boa Noite!
Preciso de ajuda, preciso excluir linhas duplicadas, porém, quero apagar de cima para baixo.
Por exemplo, tenho a linha 1,2,3 e 94,95,96 que são linhas duplicadas, gostaria de apagar a linha 1,2,3 e manter a 94,95,96.
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Apagar linhas duplicadas, ordenadas [RESOLVIDO]
Apagar linhas duplicadas, ordenadas [RESOLVIDO]
Editado pela última vez por adhuters em Seg Abr 30, 2018 7:56 pm, em um total de 1 vez.
-
- Manda bem
- Mensagens: 168
- Registrado em: Sáb Set 24, 2016 4:48 pm
-
- Manda bem
- Mensagens: 168
- Registrado em: Sáb Set 24, 2016 4:48 pm
Re: Apagar linhas duplicadas, ordenadas
Eu usei o gravador de macros usando um exemplo.
preenchi 4 linhas e digitei alguns valores (coluna A até a coluna D).
linha 1 ficou igual a linha 4.
O resultado foi bem prox do que você pediu... porém a macro apagou os valores da última linha, vc comentou que prefere que apague os valores da primeira...
preenchi 4 linhas e digitei alguns valores (coluna A até a coluna D).
linha 1 ficou igual a linha 4.
Código: Selecionar todos
Sub Macro1()
'
' Macro1 Macro
'
'
Columns("A:D").Select
ActiveSheet.Range("$A$1:$D$13").RemoveDuplicates Columns:=Array(1, 2, 3, 4), _
Header:=xlNo
Range("I13").Select
End Sub
-
- Manda bem
- Mensagens: 168
- Registrado em: Sáb Set 24, 2016 4:48 pm