TUTORIAL EXCEL – Cara membandingkan data di dua kolom untuk menemukan data ganda pada Excel

Artikel ini menjelaskan dua metode yang dapat dipakai untuk membandingkan data dalam dua kolom lembar kerja Microsoft Excel dan menemukan entri ganda.

Metode 1: Gunakan rumus lembar kerja

Untuk menggunakan rumus lembar kerja guna membandingkan data dalam dua kolom, ikuti langkah-langkah berikut:

  1. Buka Excel.
  2. Pada lembar kerja yang baru, masukkan data berikut (biarkan kolom B kosong):
    A1: 1   B1:     C1: 3
    A2: 2   B2:     C2: 5
    A3: 3   B3:     C3: 8
    A4: 4   B4:     C4: 2
    A5: 5   B5:     C5: 0
    
  3. Ketik rumus berikut dalam sel B1:
    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),””,A1)
  4. Pilih sel B1:B5.
  5. Di Microsoft Office Excel 2003 dan versi Excel sebelumnya, arahkan ke Isi pada menu Edit, lalu klik Turun.Di Microsoft Office Excel 2007 dan Excel 2010, klik Isi di grup Pengeditan, lalu klik Turun.

    Nomor-nomor ganda akan ditampilkan dalam kolom B, seperti contoh berikut:

       A1: 1   B1:     C1: 3
       A2: 2   B2: 2   C2: 5
       A3: 3   B3: 3   C3: 8
       A4: 4   B4:     C4: 2
       A5: 5   B5: 5   C5: 0
    
    

Metode 2: Gunakan makro Visual Basic

Microsoft memberikan contoh pemrograman hanya untuk tujuan ilustrasi, tanpa jaminan tertulis maupun tersirat. Ini termasuk, namun tidak terbatas pada, jaminan tersirat mengenai kelayakan untuk diperdagangkan atau kesesuaian untuk tujuan tertentu. Artikel ini menganggap bahwa Anda sudah terbiasa dengan bahasa pemrogaman yang ditunjukkan dan dengan alat yang digunakan untuk membuat dan memperbaiki prosedur. Teknisi Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu. Meskipun demikian, mereka tidak akan mengubah contoh tersebut untuk menyediakan fungsionalitas tambahan atau membuat prosedur untuk memenuhi syarat khusus Anda. Untuk menggunakan makro Visual Basic untuk membandingkan data dalam dua kolom, gunakan langkah-langkah dalam contoh berikut:

  1. Buka Excel.
  2. Tekan ALT+F11 untuk memulai penyunting Visual Basic.
  3. Pada menu Sisipkan, klik Modul.
  4. Masukkan kode berikut pada 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 Sub
    
  5. Tekan ALT+F11 untuk kembali ke Excel.
  6. Masukkan data berikut (biarkan kolom B kosong):
    A1: 1   B1:     C1: 3
    A2: 2   B2:     C2: 5
    A3: 3   B3:     C3: 8
    A4: 4   B4:     C4: 2
    A5: 5   B5:     C5: 0
    
  7. Pilih rentang A1:A5.
  8. Di Excel 2003 dan versi Excel sebelumnya, arahkan ke Makro pada menu Alat, lalu klik Makro.

    Di Excel 2007 dan Excel 2010, klik tab Pengembang, lalu klik Makro di grup Kode.

  9. Klik Find_Matches, lalu klik Jalankan.

Angka duplikat ditampilkan di kolom B. Angka yang sesuai akan diletakkan di samping kolom pertama, seperti ilustrasi di bawah ini:

   A1: 1   B1:     C1: 3
   A2: 2   B2: 2   C2: 5
   A3: 3   B3: 3   C3: 8
   A4: 4   B4:     C4: 2
   A5: 5   B5: 5   C5: 0

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *