- Para eliminar valores repetidos de una columna hay que hacer lo siguiente:
- Parte de una lista con valores duplicados en una columna.
- Presiona las teclas Alt + F11 y luego doble click en:
- En el editor de texto escribe el siguiente código:
Sub EliminarDuplicados()
Columns(1).EntireColumn.Insert
Range(“B1″, Range(“B65536″).End(xlUp)).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range(“A1″), Unique:=True
Columns(2).EntireColumn.Delete
End Sub
Nota: El valor 1 debe corresponder al nº de columna que contiene el listado. El valor 2 debe coincidir con el de otra columna que esté vacía, y además, la letra de estas referencias: “B1″, Range(“B65536″) debe coincidir con esa columna libre.
- Cierra el editor.
- Presiona las teclas Alt + F8 y escoge la macro que hemos generado EliminarDuplicados y ejecútala.
- Los valores duplicados se eliminarán.

Escrito por Juan Carlos Hernandez
Escrito por Juan Carlos Hernandez