Di antara alat Microsoft Excel standar, ada banyak cara berbeda untuk menyorot duplikat dengan warna. Cara termudah dan tercepat adalah dengan pemformatan bersyarat. Untuk melakukan ini, cukup pilih rentang sel dan pilih pada tab Beranda — Pemformatan Bersyarat — Aturan Pemilihan Sel — Nilai Duplikat (Beranda — Pemformatan Bersyarat — Sorot Aturan Sel — Nilai Duplikat):
Namun, dalam kasus ini, warna isian semua sel akan sama, yaitu hanya menandakan bahwa elemen memiliki duplikat di tempat lain dalam rentang, tetapi tidak membantu menemukannya. Anda dapat memperbaiki situasi dengan makro kecil yang akan mengisi setiap pasangan (atau lebih) duplikat berulang dengan warnanya sendiri:
Jadi lebih jelas, kan? Tentu saja, dengan sejumlah besar sel berulang, akan sulit untuk membedakan antara warna, tetapi dengan jumlah duplikat yang relatif kecil, metode ini akan bekerja dengan sempurna.
Untuk menggunakan makro ini, tekan pintasan keyboard Alt + F11 atau tombol Visual Basic tab Pengembang, masukkan modul kosong baru melalui menu Sisipkan – Modul dan salin kode makro ini di sana:
Sub DuplicatesColoring() Dim Dupes() 'Deklarasikan array untuk menyimpan duplikat ReDim Dupes(1 To Selection.Cells.Count, 1 To 2) Selection.Interior.ColorIndex = -4142 'Hapus isian jika i = 3 Untuk Setiap sel Di Selection If WorksheetFunction.CountIf(Selection, cell.Value) > 1 Then For k = LBound(Dupes) To UBound(Dupes) 'jika sel sudah berada dalam array duplikat, isikan If Dupes(k, 1) = cell Kemudian sel. Interior. ColorIndex = Dupes(k, 2) Next k 'jika sel berisi duplikat, tetapi belum ada dalam array, tambahkan ke array dan isi If cell.Interior.ColorIndex = -4142 Kemudian cell.Interior.ColorIndex = i Dupes(i, 1 ) = cell.Value Dupes(i, 2) = ii = i + 1 End If End If Next cell End Sub
Sekarang Anda dapat memilih rentang apa pun dengan data pada lembar dan menjalankan makro kami menggunakan pintasan keyboard Alt + F8 atau melalui tombol Macro (Makro) tab pembangun (Pengembang).
- Sorot duplikat dengan warna
- Apa itu makro, di mana menyisipkan kode makro di Visual Basic, bagaimana menjalankannya
- Cara menghitung jumlah nilai unik dalam rentang sel tertentu