Dobre iluminación de duplicados

Entre as ferramentas estándar de Microsoft Excel, hai moitas formas diferentes de resaltar os duplicados con cor. O xeito máis sinxelo e rápido é co formato condicional. Para iso, só tes que seleccionar un intervalo de celas e seleccionar na pestana Inicio — Formato condicional — Regras de selección de cela — Valores duplicados (Inicio — Formato condicional — Regras de resaltado de celas — Valores duplicados):

Non obstante, neste caso, a cor de recheo de todas as celas será a mesma, é dicir, simplemente indica que o elemento ten duplicados noutro lugar do intervalo, pero non fai nada para atopalos. Podes corrixir a situación cunha pequena macro que encherá cada par (ou máis) de duplicados repetidos coa súa propia cor:

Moito máis claro, non? Por suposto, cunha gran cantidade de celas repetidas, será difícil distinguir entre tons, pero cun número relativamente pequeno de duplicados, este método funcionará perfectamente.

Para usar esta macro, preme o atallo do teclado Alt + F11 ou botón Visual Basic aba Revelador, insira un novo módulo baleiro a través do menú Inserir – Módulo e copia alí o código desta macro:

Sub DuplicatesColoring() Dim Dupes() 'Declarar unha matriz para almacenar duplicados ReDim Dupes(1 To Selection.Cells.Count, 1 To 2) Selection.Interior.ColorIndex = -4142 'Eliminar o recheo se i = 3 Para cada cela en Selección Se WorksheetFunction.CountIf(Selection, cell.Value) > 1 Entón, Para k = LBound(Dupes) To UBound(Dupes) 'se a cela xa está na matriz de duplicados, encha If Dupes(k, 1) = cela Despois célula.Interior. ColorIndex = Dupes(k, 2) A continuación k 'se a cela contén un duplicado, pero aínda non está na matriz, engádeo á matriz e enchea Se cell.Interior.ColorIndex = -4142 Entón cell.Interior.ColorIndex = i Dupes(i, 1 ) = cell.Value Dupes(i, 2) = ii = i + 1 End If End If Next cell End Sub  

Agora podes seleccionar calquera intervalo con datos na folla e executar a nosa macro usando o atallo de teclado Alt + F8 ou a través do botón Macros (Macros) aba revelador (Desenvolvedor).

• Resalte os duplicados con cor
• Que son as macros, onde inserir código de macro en Visual Basic, como executalas
• Como contar o número de valores únicos nun determinado intervalo de celas