Carrito: 
Frecuentemente me llegan a mi email preguntas de como identificar fácilmente datos duplicados en una columna.
Les comparto una solución empleando la fórmula de Excel CONTAR.SI y también otra solución utilizando código VBA para las personas que prefieran hacerlo más automático.
Los ejemplos los pueden ver descargando este libro. Descargar *xls
Les comparto una solución empleando la fórmula de Excel CONTAR.SI y también otra solución utilizando código VBA para las personas que prefieran hacerlo más automático.
Los ejemplos los pueden ver descargando este libro. Descargar *xls
Código VBA:
Option Explicit
Sub Duplicados()
Dim rng As Range
With CreateObject("scripting.dictionary")
.comparemode = 1
For Each rng In Range("A2", Range("A" & Rows.Count).End(3))
If .Item(rng.Value) = 1 Then _
rng.Offset(, 1) = "Duplicado" Else rng.Offset(, 1) = "OK"
.Item(rng.Value) = 1
Next rng
End With
End Sub
