Innehåll

Bland de vanliga Microsoft Excel-verktygen finns det många olika sätt att markera dubbletter med färg. Det enklaste och snabbaste sättet är med villkorlig formatering. För att göra detta, välj bara ett cellintervall och välj på fliken Hem — Villkorlig formatering — Cellvalsregler — Duplicerade värden (Hem — Villkorlig formatering — Markera celler regler — Duplicera värden):

Dubbel belysning av dubbletter

Men i det här fallet kommer fyllningsfärgen för alla celler att vara densamma, dvs den signalerar helt enkelt att elementet har dubbletter någon annanstans i intervallet, men gör ingenting för att hjälpa till att hitta dem. Du kan fixa situationen med ett litet makro som kommer att fylla varje par (eller fler) upprepade dubbletter med sin egen färg:

Dubbel belysning av dubbletter

Så mycket tydligare, eller hur? Naturligtvis, med ett stort antal upprepade celler, kommer det att vara svårt att skilja mellan nyanser, men med ett relativt litet antal dubbletter kommer denna metod att fungera perfekt.

För att använda detta makro, tryck på kortkommandot Alt + F11 eller knapp Visual Basic fliken Utvecklare, infoga en ny tom modul via menyn Infoga – Modul och kopiera koden för detta makro dit:

Sub DuplicatesColoring() Dim Dupes() 'Deklarera en array för att lagra dubbletter ReDim Dupes(1 To Selection.Cells.Count, 1 To 2) Selection.Interior.ColorIndex = -4142 'Ta bort fyllningen om i = 3 För varje cell I Selection If WorksheetFunction.CountIf(Selection, cell.Value) > 1 Then For k = LBound(Dupes) To UBound(Dupes) 'om cellen redan finns i arrayen av dubbletter, fyll i If Dupes(k, 1) = cell Sedan cell.Interior. ColorIndex = Dupes(k, 2) Nästa k 'om cellen innehåller en dubblett, men ännu inte i arrayen, lägg till den i arrayen och fyll den. 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  

Nu kan du välja valfritt intervall med data på arket och köra vårt makro med kortkommandot Alt + F8 eller via knappen Makron (Makron) fliken utvecklare (Utvecklaren).

  • Markera dubbletter med färg
  • Vad är makron, var man infogar makrokod i Visual Basic, hur man kör dem
  • Hur man räknar antalet unika värden i ett givet cellintervall

Kommentera uppropet