Skip to main content

Excel'de yinelenenlere göre birden fazla satırı birleştirmek nasıl yapılır?

Author: Xiaoyang Last Modified: 2025-06-10

Belki de aşağıdaki ekran görüntüsü verilerine sahipsiniz, Ürün adı sütunu A'da bazı yinelenen öğeler var ve şimdi sütun A'daki yinelenen girişleri kaldırmak ancak sütun B'deki karşılık gelen değerleri birleştirmek istiyorsunuz, ekran görüntüleri:

a screenshot showing the original data a screenshot of arrow a screenshot showing the combined rows

Bu görevi çözmek için etkili yöntemleriniz var mı?

Birden fazla yinelenen satırı VBA kodu ile birleştirme

Birden fazla yinelenen satırı Kutools for Excel ile birleştirme

Birden fazla yinelenen satırı birleştirin ve değerleri Kutools for Excel ile toplam/ortalama hesaplayın


Birden fazla yinelenen satırı VBA kodu ile birleştirme

Aşağıdaki VBA kodu, size sütun A değerine göre yinelenen satırları birleştirmenize yardımcı olabilir ve aşağıdaki kod yalnızca iki sütuna uygulanır. Yani, iki sütunlu verilere sahipseniz, bu kod sizin için işe yarayacaktır.

1. ALT + F11 tuşlarını basılı tutun ve Microsoft Visual Basic for Applications penceresi açılır.

2. Ekle Insert > Module'e tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: birden fazla satırı birleştirme

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3. Ardından F5 tuşuna basın ve seçmeniz gereken bir aralıkla ilgili sizi uyarmak için bir uyarı kutusu açılır. Ekran görüntüsüne bakın:

a screenshot of selecting data range after running the code

4. Ve sonra Tamam'a tıklayın, sütun B'deki değerler bir kayıt halinde birleştirilmiş ve boşluklarla ayrılmıştır.

a screenshot showing the result

Notlar:

1. Bu kod orijinal verileri bozabilir, kullandığınızda önce verileri yedeklemeniz daha iyi olur.

2. Bu kod yalnızca iki sütuna uygulanır, iki sütundan fazlasına sahipseniz bu kod yalnızca ilk iki sütunu birleştirir ve diğer sütun verilerini kaldırır. Bu kodu kullandığınızda dikkatli olmalısınız.


Birden fazla yinelenen satırı Kutools for Excel ile birleştirme

Şimdi, yukarıdaki kodun bazı sınırlamaları ve riskleri olduğuna göre, bu işi bitirmek için kullanışlı ve güvenli bir yol var mı? Kutools for Excel'in Gelişmiş Satırları Birleştir yardımcı programıyla, temel aldığınız sütunlardaki birden fazla yinelenen satırı hızlıca kaldırabilir ve diğer kayıtları uygun hücrelere birleştirebilir veya bazı hesaplamalar yapabilirsiniz.

Kutools for Excel , 300'den fazla kullanışlı Excel aracı içerir. 30 gün boyunca sınırlamasız ücretsiz deneme imkanı. Şimdi Edinin.

Kutools for Excel'i yükledikten sonra lütfen şu adımları izleyin:

1. Birleştirmek istediğiniz yinelenen veri aralığını seçin.

a screenshot of selecting the source data

2. Ardından Kutools > Birleştir ve Böl > Gelişmiş Satırları Birleştir'e tıklayın.

3. Gelişmiş Satırları Birleştir iletişim kutusunda, değerleri birleştirmek istediğiniz sütun adını seçin ve ardından Anahtar Sütunları'na tıklayın.

a screenshot of selecting a key column in the Combine Rows Based on Column dialog box

4. Ardından değerlerini tek bir kayıtta birleştirmek istediğiniz sütuna tıklayın ve ardından Birleştirme İşlemleri'ne tıklayın ve Sadece ayırıcı ile birleştir seçeneğini seçin ve birleştirilmiş değerleri ayırmak için sağ listeden bir ayırıcı seçin. Ekran görüntüsüne bakın:

a screenshot of selecting a combine separator in the Combine Rows Based on Column dialog box

5. Ayarları tamamladıktan sonra Tamam'a tıklayın ve verileriniz anahtar sütunlarına göre birleştirilecek ve ayırıcılarla ayrılacaktır.

a screenshot of the combined result

Not: Geri kalan sütunlar için işlemler ayarlamaya ihtiyacınız yoksa, varsayılan durumu koruyun.


Birden fazla yinelenen satırı birleştirin ve değerleri Kutools for Excel ile toplam/ortalama hesaplayın

Bu çok fonksiyonlu Gelişmiş Satırları Birleştir yardımcı programıyla, yinelenen satırları birleştirebilir ve değerler için bazı hesaplamalar yapabilirsiniz.

1. Birleştirmek istediğiniz yinelenen veri aralığını seçin.

2. Gelişmiş Satırları Birleştir iletişim kutusuna gidin;

  • (1.) Diğer sütun değerlerini hesaplamak istediğiniz bir sütun adını anahtar sütun olarak seçin ve ardından Anahtar Sütunları'na tıklayın;
  • (2.) Değerler için bazı hesaplamalar yapmak istediğiniz sütunu seçin ve ardından Birleştirme İşlemleri > Birleştir Hesapla'ya tıklayın, ardından ihtiyacınız olan bir hesaplama türünü seçin, bu durumda Toplam'ı seçiyorum. Ekran görüntüsüne bakın:

a screenshot showing how to set the Combine Rows Based on Column dialog box

3. Geri kalan sütunlar için işlemler ayarlamaya ihtiyacınız yoksa, varsayılan durumu koruyun, ardından Tamam'a tıklayın ve sütun A'daki yinelenen değerler birleştirilecek ve sütun B'deki karşılık gelen değerler toplanacaktır. Ekran görüntülerine bakın:

a screenshot of the original data range an arrow a screenshot of the combined result

Notlar:

1. Verilerimde başlıklar var seçeneğini işaretlerseniz, bu yardımcı programı uyguladığınızda aralığın başlıkları (ilk satır) göz ardı edilecektir.

2. Biçimlendirilmiş değerleri kullan: yinelenen hücreleri birleştirdikten sonra değerlerin biçimlendirmesini korur.

3. Bu yardımcı program filtreleme verileri için kullanılamaz.

Bu Gelişmiş Satırları Birleştir işlevi hakkında daha fazla bilgi için tıklayın.


İlgili makale:

Yinelenen satırları birleştirin ve değerleri toplayın


En İyi Ofis Verimlilik Araçları

🤖 Kutools AI Asistanı: Veri analizinde devrim yaratın: Akıllı Yürütme   |  Kod Oluştur  |  Özel Formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur  |  Geliştirilmiş İşlevleri Çağır
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya İşaretle   |  Boş Satırları Sil   |  Sütunları veya Hücreleri Verileri Kaybetmeden Birleştir   |   Formül Olmadan Yuvarla ...
Süper ARA: Çok Kriterli Düşeyara    Çoklu Değer Düşeyara  |   Çoklu sayfa araması   |   Bulanık Eşleme ....
Gelişmiş Açılır Liste: Hızlıca Açılır Liste Oluştur   |  Bağımlı Açılır Liste   |  Çoklu Seçimli Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekle  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştır ...
Öne Çıkan Özellikler: Izgara Odaklama   |  Tasarım Görünümü   |   Gelişmiş formül çubuğu    Çalışma Kitabı & Çalışma Sayfası Yöneticisi   |  Otomatik Metin Kütüphanesi (Auto Text)   |  Tarih Seçici   |  Veri Birleştir   |  Hücreleri Şifrele/Şifre Çöz    Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtrele...) ...
En İyi15 Araç Seti12 Metin Aracı (Metin Ekle, Belirli Karakterleri Sil, ...)   |   50+ Grafik Türü (Gantt Grafiği, ...)   |   40+ Pratik Formül (Doğum tarihine dayanarak yaş hesapla, ...)   |   19 Ekleme Aracı (QR Kodu Ekle, Yoldan Resim Ekle, ...)   |   12 Dönüşüm Aracı (Kelimeye Dönüştür, Para Birimi Dönüştürme, ...)   |   7 Birleştir & Böl Aracı (Gelişmiş Satırları Birleştir, Hücreleri Böl, ...)   |   ... ve daha fazlası

Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar.  En çok ihtiyacınız olan özelliği almak için buraya tıklayın...


Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır

  • Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
  • Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
  • Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!