Excel 'de yinelenmeleri bulmak için iki sütundaki verileri karşılaştırma

İki Microsoft Excel çalışma sayfası sütunundaki verileri karşılaştırmak ve yinelenen girdileri bulmak için aşağıdaki yöntemleri kullanabilirsiniz. 

Yöntem 1: çalışma sayfası formülü kullanma

  1. Excel 'i başlatın.

  2. Yeni bir çalışma sayfasında, aşağıdaki verileri örnek olarak girin (B sütununu boş bırakın):

    A

    B

    C

    1

    1

    3

    2

    2

    5

    3

    3

    8

    4

    4

    2

    5

    5

    0

  3. B1 hücresine aşağıdaki formülü yazın:

    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)

  4. B1 hücresini B5 olarak seçin.

  5. Excel 2007 ve Excel 'in sonraki sürümlerinde, düzenleme grubunda doldur 'U seçin ve ardından aşağı'yı seçin.

    Aşağıdaki örnekte gösterildiği gibi, yinelenen numaralar B sütununda görüntülenir: 

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Yöntem 2: Visual Basic makrosu kullanma

Uyarı: Microsoft, yalnızca gösterim için programlama örnekleri sunar, açık veya ima edilen garanti vermez. Bu, satılabilirlik veya belirli bir amaca uygunluk dahil olmak üzere örtülü garantileri içerir. Bu makalede, gösterilen programlama dilini ve yordamları oluşturmak ve hataları ayıklamak için kullanılan araçları kullanmayı bildiğiniz varsayılmaktadır. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir. Bununla birlikte, belirli gereksinimlerinizi karşılayacak ek işlevler veya yordamlar oluşturmak için bu örnekleri değiştirmeyecektir.

İki sütundaki verileri karşılaştırmak üzere bir Visual Basic makrosu kullanmak için aşağıdaki örnekteki adımları kullanın:

  1. Excel'i başlatın.

  2. Visual Basic Düzenleyicisi 'ni başlatmak için ALT + F11 tuşlarına basın.

  3. Ekle menüsünde Modül'ü seçin.

  4. Modül sayfasına aşağıdaki kodu girin:

    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. Excel 'e dönmek için ALT + F11 tuşlarına basın.

    1. Aşağıdaki verileri örnek olarak girin (B sütununu boş bırakın):
       

      A

      B

      C

      1

      1

      3

      2

      2

      5

      3

      3

      8

      4

      4

      2

      5

      5

      0

  6. A1-A5 hücresini seçin.

  7. Excel 2007 ve Excel 'in sonraki sürümlerinde, Geliştirici sekmesini seçin ve ardından kod grubundaki makrolar 'ı seçin.

    Not: Geliştirici sekmesini görmüyorsanız, bunu açmanız gerekebilir. Bunu yapmak için dosya > Seçenekler > şeridi özelleştirin'i seçin ve ardından sağ taraftaki özelleştirme kutusunda Geliştirici sekmesini seçin.

  8. Find_Matchesve sonra da Run'ı tıklatın.

    Yinelenen numaralar B sütununda görüntülenir. Eşleşen numaralar, burada gösterildiği gibi ilk sütunun yanına yerleştirilir:

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Not:  Bu sayfanın çevirisi otomasyon aracılığıyla yapılmıştır ve bu nedenle hatalı veya yanlış dil bilgisi kullanımları içerebilir. Amacımız, bu içeriğin sizin için faydalı olabilmesini sağlamaktır. Bu bilgileri yararlı bulup bulmadığınızı bizimle paylaşır mısınız? Kolayca başvurabilmek için İngilizce makaleye buradan ulaşabilirsiniz.

Office yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Office Insider Programına Katılın

Bu bilgi yararlı oldu mu?

Görüşleriniz için teşekkür ederiz!

Geri bildiriminiz için teşekkürler! Office destek temsilcilerimizden biriyle görüşmeniz yararlı olabilir.

×