Apagar linhas duplicadas, ordenadas [RESOLVIDO]

[adhuters]

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.

[Wagner.cwb]

Você pode postar a planilha para facilitar o entendimento?

[Wagner.cwb]

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.

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

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...

[Wagner.cwb]

Dá uma olhada nesses exemplos também

https://pt.stackoverflow.com/questions/ ... duplicadas

abs!