Onder die standaard Microsoft Excel-nutsgoed is daar baie verskillende maniere om duplikate met kleur uit te lig. Die maklikste en vinnigste manier is met voorwaardelike formatering. Om dit te doen, kies net 'n reeks selle en kies op die oortjie Tuis — Voorwaardelike formatering — Selkeusereëls — Duplikaatwaardes (Tuis — Voorwaardelike formatering — Merk selle reëls — Duplikaatwaardes):
In hierdie geval sal die vulkleur van alle selle egter dieselfde wees, dit wil sê dit dui bloot aan dat die element duplikate iewers anders in die reeks het, maar doen niks om dit te help vind nie. U kan die situasie regmaak met 'n klein makro wat elke paar (of meer) herhaalde duplikate met sy eie kleur sal vul:
Soveel duideliker, reg? Natuurlik, met 'n groot aantal herhalende selle, sal dit moeilik wees om tussen skakerings te onderskei, maar met 'n relatief klein aantal duplikate sal hierdie metode perfek werk.
Om hierdie makro te gebruik, druk die sleutelbordkortpad Alt + F11 of knoppie Visual Basic tab Ontwikkelaar, voeg 'n nuwe leë module in via die spyskaart Voeg in – Module en kopieer die kode van hierdie makro daarheen:
Sub DuplicatesColoring() Dim Dupes() 'Verklaar 'n skikking om duplikate te stoor ReDim Dupes(1 To Selection.Cells.Count, 1 To 2) Selection.Interior.ColorIndex = -4142 'Verwyder die vul as i = 3 Vir elke sel In Seleksie If WorksheetFunction.CountIf(Seleksie, sel.Waarde) > 1 Then For k = LBound(Dupes) To UBound(Dupes) 'as die sel reeds in die skikking van duplikate is, vul in If Dupes(k, 1) = sel Dan sel.Binnenland. ColorIndex = Dupes(k, 2) Volgende k 'as die sel 'n duplikaat bevat, maar nog nie in die skikking nie, voeg dit by die skikking en vul dit as cell.Interior.ColorIndex = -4142 Dan cell.Interior.ColorIndex = i Dupes(i, 1 ) = sel.Waarde Dupes(i, 2) = ii = i + 1 End If End If Next cell End Sub
Nou kan jy enige reeks met data op die blad kies en ons makro met die sleutelbordkortpad laat loop Alt + F8 of deur die knoppie Macros (Makro's) tab ontwikkelaar (Ontwikkelaar).
- Merk duplikate met kleur
- Wat is makro's, waar om makro-kode in Visual Basic in te voeg, hoe om dit uit te voer
- Hoe om die aantal unieke waardes in 'n gegewe reeks selle te tel