Excel VBA ile Tekrarlanan Değerleri Bulma

Excel VBA ile Tekrarlanan Değerleri Bulma
Excel VBA Tekrarlanan Değerleri Bulma

1. Hemen Kullanılabilir 4 Adet VBA Tekrarlanan Değer Bulma Kodu

1. A1'deki Değer Tekrar Ediyor mu?

A1 hücresindeki değerin A sütununda kaç kez tekrarlandığını gösterir.

Sub TekrarKontrol()
    MsgBox Application.CountIf(Range("A:A"), Range("A1"))
End Sub

3. Benzersizleri Say

A sütununda kaç farklı (benzersiz) değer olduğunu bulur.

Sub BenzersizSay()
    MsgBox Application.CountA(Range("A:A")) - Application.CountIf(Range("A:A"), "=")
End Sub

2. Seçili Bölgede Tekrar Var mı?

Seçtiğiniz hücrelerde tekrar eden değer var mı kontrol eder.

Sub TekrarVarMi()
    If Application.CountIf(Selection, Selection.Cells(1)) > 1 Then
        MsgBox "Tekrar var!"
    Else
        MsgBox "Tekrar yok!"
    End If
End Sub

4. Tüm Tekrarları Say

A sütununda kaç tane tekrar eden değer olduğunu bulur.

Sub ToplamTekrarSay()
    MsgBox Application.CountIf(Range("A:A"), Range("A1"))
End Sub

2. VBA Makroları için Ön Hazırlık

1. Geliştirici Sekmesini Aktifleştirin

Excel'de VBA kodlarını yazabilmek için önce Geliştirici sekmesini aktif etmelisiniz. Detaylı bilgi için tıklayın.

VBA - Geliştirici sekmesi
⚙️ Geliştirici sekmesini aktifleştirme

3. Modül Ekleyin

Kodlarınızı yazmak için bir Modül eklemelisiniz. Makro yazma rehberi için tıklayın.

VBA - Modül ekleme
📝 Modül ekleme

2. Visual Basic Düzenleyici'yi Açın

Alt + F11 (Windows) veya Option + F11 (Mac) ile hızlıca açabilirsiniz.

Visual Basic Düzenleyici'yi Açma
📝 Visual Basic Düzenleyici'yi Açma

4. Kodu Çalıştırın

Yazdığınız kodu çalıştırmak için F5 tuşuna basın veya Çalıştır butonuna tıklayın. VBA makro nedir? öğrenmek için tıklayın.

F5

▶️ Makroyu çalıştır

📋 Makro çalıştırma

3. Sıkça Sorulan Sorular

01 Excel VBA ile tekrarlanan değerler nasıl bulunur?

CountIf ile Application.CountIf(Selection, hucre.Value) > 1 kontrolü yaparak tekrarları bulabilirsiniz.

02 CountIf ve Dictionary arasındaki fark nedir?

CountIf her değer için aralığı tarar (yavaş), Dictionary her değeri bir kez işler (hızlı).

03 Tekrarlanan değerleri nasıl renklendiririm?

hucre.Interior.Color = RGB(255, 0, 0) kodu ile kırmızı renk verebilirsiniz.

04 Mac'te VBA çalışır mı?

Evet, Mac'te de aynı kodlar çalışır. Option+F11 ile VBA'ya erişin.

05 Tekrarları silerken neden hata alıyorum?

Boş hücreler hata verir. If Not IsEmpty(hucre) kontrolü ekleyin.

06 Tekrarları nasıl temizleyebilirim?

Tekrarları temizlemek için VBA ile tekrar eden verileri kaldırma makalesini inceleyin.

💡 İpucu: Makroları çalıştırmadan önce dosyanızı yedeklemeyi unutmayın. Ctrl+S ile kaydedin.
🤖 Akıllı Arama Asistanı
💬 Merhaba! Size nasıl yardımcı olabilirim?
Excel Asistanı
👋 Merhaba! Excel ile ilgili ne öğrenmek istersin? Örn: DÜŞEYARA nasıl kullanılır?
DÜŞEYARA Pivot Tablo Gantt Şeması