Entre las herramientas estándar de Microsoft Excel, hay muchas formas diferentes de resaltar duplicados con color. La forma más fácil y rápida es con formato condicional. Para hacer esto, simplemente seleccione un rango de celdas y seleccione en la pestaña Inicio — Formato condicional — Reglas de selección de celdas — Valores duplicados (Inicio — Formato condicional — Resaltar reglas de celdas — Valores duplicados):
Sin embargo, en este caso, el color de relleno de todas las celdas será el mismo, es decir, simplemente indica que el elemento tiene duplicados en algún otro lugar del rango, pero no ayuda a encontrarlos. Puedes arreglar la situación con una pequeña macro que llenará cada par (o más) de duplicados repetidos con su propio color:
Mucho más claro, ¿verdad? Por supuesto, con una gran cantidad de celdas repetidas, será difícil distinguir entre tonos, pero con una cantidad relativamente pequeña de duplicados, este método funcionará perfectamente.
Para usar esta macro, presione el atajo de teclado Alt + F11 o botón Visual Basic de la pestaña. Developer, inserte un nuevo módulo vacío a través del menú Insertar – Módulo y copie el código de esta macro allí:
Sub DuplicatesColoring() Dim Dupes() 'Declara una matriz para almacenar duplicados ReDim Dupes(1 a Selection.Cells.Count, 1 a 2) Selection.Interior.ColorIndex = -4142 'Elimina el relleno si i = 3 para cada celda en Selección If WorksheetFunction.CountIf(Selection, cell.Value) > 1 Then For k = LBound(Dupes) To UBound(Dupes) 'si la celda ya está en la matriz de duplicados, rellene If Dupes(k, 1) = cell Luego celda.Interior. ColorIndex = Dupes(k, 2) Siguiente k 'si la celda contiene un duplicado, pero aún no está en la matriz, agréguelo a la matriz y llénelo If cell.Interior.ColorIndex = -4142 Then cell.Interior.ColorIndex = i Dupes(i, 1 ) = cell.Value Dupes(i, 2) = ii = i + 1 End If End If Next cell End Sub
Ahora puede seleccionar cualquier rango con datos en la hoja y ejecutar nuestra macro usando el atajo de teclado Alt + F8 o a través del botón Macros (macros) de la pestaña. revelador (Desarrollador).
- Resalta los duplicados con color
- Qué son las macros, dónde insertar código de macro en Visual Basic, cómo ejecutarlas
- Cómo contar la cantidad de valores únicos en un rango dado de celdas