Remover Duplicadas com VBA

[Emerson Pedro]

Boa tarde tudo bem? 

Preciso remover duplicadas que estão em mais de uma coluna, estava fazendo um teste com apenas duas. 

Usei o seguinte:

 

Sub excluirRepetidos()

Dim anterior As Long
Dim posterior As Long

For anterior = 2 To Sheets(1).UsedRange.Rows.Count - 1

For posterior = anterior + 1 To Sheets(1).UsedRange.Rows.Count

If Sheets(1).Cells(anterior, 1).Value = Sheets(1).Cells(posterior, 1).Valeu Then
If Sheets(1).Cells(anterior, 2).Value = Sheets(1).Cells(posterior, 2).Valeu Then

Sheets(1).Cells(posterior, 1).EntireRow.Delete

End If
End If

 Next posterior
 Next anterior
 
End Sub

 

Dessa forma gostaria que ele validasse nas duas colunas se tem algo repetido com a linha anterior e se positivo removesse a linha, porém, da erro na linha: If Sheets(1).Cells(anterior, 1).Value = Sheets(1).Cells(posterior, 1).Valeu Then

O que posso fazer?