Quiero eliminar filas de las parejas de datos duplicados en Excel
Tengo un excel que tiene una base da datos. A partir de la columna Email, quiero eliminar el duplicado y valor original. Que no quede ni uno de los dos datos ni su respectiva fila.
Archivo: http://goo.gl/1SC1MZ
1 respuesta
Respuesta de Henry Boom
2
Anexo macro que elimina los duplicados de la columna "Email":
Sub repetidos()
'Opcional
'Application.ScreenUpdating = False
Range("E2").Select
Do While Not IsEmpty(ActiveCell)
x = WorksheetFunction.CountIf(Range("E:E"), ActiveCell)
If x > 1 Then
ActiveCell.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
Range("E1").Select
'Opcional
'Application.ScreenUpdating = True
End Sub
