ID Artikel: 213367 - Melihat produk di mana artikel ini berlaku.
Perbesar semua | Perkecil semua

Pada Halaman ini

Ringkasan

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

Informasi lebih lanjut

Metode 1: Gunakan formula lembar kerja

Dalam menggunakan formula lembar kerja untuk membandingkan data di dua kolom, ikuti langkah berikut:
  1. Mulai 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 formula berikut dalam sel B1:
    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)
  4. Pilih sel B1:B5.
  5. Pada Microsoft Office Excel 2003 dan versi Excel sebelumnya, arahkan ke Isi pada menu Sunting, dan klik Turun.

    Pada Office Excel 2007 dan Excel 2010, klik Isi pada grup Menyunting , dan 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 garansi baik yang tertulis maupun tersirat. Hal ini mencakup, namun tidak terbatas pada, garansi yang tersirat pada keadaan yang dapat diperjualbelikan 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, ikuti langkah-langkah dalam contoh berikut:
  1. Mulai Excel.
  2. Tekan ALT+F11 untuk memulai penyunting Visual Basic.
  3. Pada menu Sisipkan, klik Internet Options.
  4. Masukkan kode berikut pada lembar modul:
    Sub Find_Matches()
        Dim CompareRange As Variant, x As Variant, y As Variant
        ' Tetapkan CompareRange menjadi sama seperti kisaran yang
        ' akan Anda bandingkan pilihannya.
        Set CompareRange = Range("C1:C5")
        ' CATATAN: Jika rentang yang dibandingkan berada pada buku kerja yang lain
        ' atau lembar kerja, gunakan sintaksis berikut.
        ' Set CompareRange = Workbooks("Book2"). _
        '   Worksheets("Sheet2").Range("C1:C5")
        '
        ' Ulangi pada tiap sel dalam pilihan dan bandingkan dengan
        ' tiap sel dalam CompareRange.
        Untuk Setiap x Dalam Seleksi
            Untuk Setiap y Dalam 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. Pada Microsoft Office Excel 2003 dan versi Excel sebelumnya, arahkan ke Makro pada menu Tools , dan klik Makro.

    Pada Excel 2007 dan Excel 2010, klik tab Pengembang, dan klik Makro pada Kode grup.
  9. Klik Cari_Padanan, 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
				
Catatan Ini merupakan artikel "FAST PUBLISH" dibuat langsung dari organisasi pendukung Microsoft. Informasi yang termuat di dalamnya disediakan apa adanya sebagai respons atas masalah yang muncul. Sebagai akibat dari pembuatan informasi yang cepat ini, mungkin terdapat kesalahan ketik dan dapat direvisi setiap saat tanpa pemberitahuan. Lihat Syarat Penggunaan untuk pertimbangan lainnya.

Properti

ID Artikel: 213367 - Kajian Terakhir: 29 November 2013 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Excel 2010
  • Microsoft Office Excel 2007
  • Microsoft Office Excel 2003
Kata kunci: 
kbdtacode kbhowto kbprogramming KB213367

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com