Excel untuk Microsoft 365 Excel untuk Microsoft 365 untuk Mac Excel 2021 Excel 2021 for Mac Excel 2019 Excel 2019 untuk Mac Excel 2016 Excel 2016 untuk Mac Excel 2013 Office untuk bisnis Excel 2010 Excel 2007 Lainnya...Lebih sedikit
Anda dapat menggunakan metode berikut untuk membandingkan data dalam dua Microsoft Excel lembar kerja dan menemukan entri duplikat.
Metode 1: Menggunakan rumus lembar kerja
Mulai Excel.
Dalam lembar kerja baru, masukkan data berikut ini sebagai contoh (biarkan kolom B kosong):
A
B
C
1
1
3
2
2
5
3
3
8
4
4
2
5
5
0
Ketikkan rumus berikut di sel B1:
=IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)
Pilih sel B1 hingga B5.
Di Excel 2007 dan versi Excel yang lebih baru, pilih Isi grup Pengeditan, lalu pilih Bawah.
Nomor duplikat ditampilkan di kolom B, seperti dalam contoh berikut:
A
B
C
1
1
3
2
2
2
5
3
3
3
8
4
4
2
5
5
5
0
Metode 2: Menggunakan Visual Basic makro
Peringatan: Microsoft menyediakan contoh pemrograman untuk ilustrasi saja, tanpa jaminan baik secara tersurat maupun tersirat. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. Artikel ini mengasumsikan bahwa Anda sudah terbiasa dengan bahasa pemrograman yang sedang ditunjukkan dan dengan alat yang digunakan untuk membuat dan melakukan debug prosedur. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu. Namun, mereka tidak akan memodifikasi contoh-contoh ini untuk menyediakan fungsionalitas tambahan atau prosedur konstruksi untuk memenuhi persyaratan tertentu.
Untuk menggunakan makro Visual Basic untuk membandingkan data dalam dua kolom, gunakan langkah-langkah dalam contoh berikut:
Buka Excel.
Tekan ALT+F11 untuk memulai Visual Basic editor.
Pada menu Sisipkan, pilih Modul.
Masukkan kode berikut ini di lembar modul:
Sub Find_Matches() Dim CompareRange As Variant, x As Variant, y As Variant ' Set CompareRange equal to the range to which you will ' compare the selection. Set CompareRange = Range("C1:C5") ' NOTE: If the compare range is located on another workbook ' or worksheet, use the following syntax. ' Set CompareRange = Workbooks("Book2"). _ ' Worksheets("Sheet2").Range("C1:C5") ' ' Loop through each cell in the selection and compare it to ' each cell in CompareRange. For Each x In Selection For Each y In CompareRange If x = y Then x.Offset(0, 1) = x Next y Next x End SubTekan ALT+F11 untuk kembali ke Excel.
Masukkan data berikut ini sebagai contoh (biarkan kolom B kosong):
A
B
C
1
1
3
2
2
5
3
3
8
4
4
2
5
5
0
Pilih sel A1 hingga A5.
Di Excel 2007 dan versi Excel baru, pilih tab Pengembang, lalu pilih Makro dalam grup Kode.
Catatan: Jika tab Pengembang tidak terlihat, Anda mungkin harus mengaktifkannya. Untuk melakukan ini, pilih > File > Kustomisasi Pita,lalu pilih tab Pengembang dalam kotak kustomisasi di sisi kanan.
Klik Find_Matches, lalu klik Jalankan.
Nomor duplikat ditampilkan di kolom B. Nomor yang cocok akan diletakkan di samping kolom pertama, seperti yang digambarkan di sini:
A
B
C
1
1
3
2
2
2
5
3
3
3
8
4
4
2
5
5
5
0