Excel'de yinelenen değerlere göre birden fazla satırı tek bir satırda nasıl birleştirirsiniz?
Aşağıdaki ekran görüntüsündeki gibi verileriniz olabilir: Ürün adı (A sütunu) sütununda bazı yinelenen öğeler bulunmaktadır. Şimdi A sütunundaki yinelenen kayıtları kaldırmak, ancak B sütunundaki karşılık gelen değerleri birleştirmeniz gerekiyor. Ekran görüntülerine bakın:
 |  |  |
Bu görevi çözmek için etkili yöntemleriniz var mı?
Birden fazla Yinelenen satır'yi VBA koduyla tek bir satırda birleştirin
Birden fazla Yinelenen satır'ü tek bir satırda Kutools for Excel ile birleştirin
Birden fazla Yinelenen satır'yı VBA koduyla tek bir satırda birleştirin
Aşağıdaki VBA kodu, A sütunundaki değerlere göre yinelenen satırları birleştirmenize yardımcı olabilir. Bu kod yalnızca iki sütun için geçerlidir; dolayısıyla veriniz iki sütundan oluşuyorsa size tam da ihtiyacınız olan çözüm olacaktır.
1. ALT + F11 tuşlarına basılı tutun; böylece Microsoft Visual Basic for Applications penceresi açılır.
2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresi’ne yapıştırın.
VBA kodu: birden fazla satırı tek bir satırda birleştirin
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; birleştirmek istediğiniz aralığı seçmenizi hatırlatan bir uyarı kutusu belirecektir. Ekran görüntüsüne bakın:
4. Ardından Tamam düğmesine tıklayın; B sütunundaki değerler tek bir kayıtta boşluklarla ayrılmış şekilde birleştirilecektir.
Notlar:
1. Bu kod, orijinal verilerinizi bozabilir; kullanmadan önce mutlaka yedek almanızı öneririz.
2. Bu kod yalnızca iki sütun için geçerlidir. İki sütundan fazla veriniz varsa, ilk iki sütun birleştirilir ve diğer sütunlardaki veriler silinir. Bu nedenle kodu kullanırken dikkatli olmalısınız.
Birden fazla Yinelenen satır'i tek bir satırda Kutools for Excel ile birleştirin
Yukarıdaki kodun bazı sınırlamaları ve riskleri varsa, bunu yapmanın daha kolay ve güvenli bir yolu yok mu? Kutools for Excel’in Gelişmiş Satırları Birleştir aracıyla, temel aldığınız sütunlardaki birden fazla yinelenen satırı anında kaldırabilir ve diğer kayıtlar için uygun hücrelere birleştirme veya hesaplama işlemlerini kolayca gerçekleştirebilirsiniz.
Kutools for Excel, 30 gün boyunca sınırsız şekilde ücretsiz deneyebileceğiniz 300'den fazla pratik Excel aracına sahip!Şimdi Edinin.
Kutools for Excel yüklendikten sonra aşağıdaki adımları uygulayın:
1. Yinelenen verileri birleştirmek istediğiniz aralığı seçin.
2. Ardından Kutools > Birleştir ve Ayır > Gelişmiş Satırları Birleştir seçeneğine tıklayın.
3. Gelişmiş Satırları Birleştir iletişim kutusunda, değerleri birleştirmek için temel almak istediğiniz sütun adını **Anahtar Sütun** olarak seçin ve ardından Anahtar Sütun düğmesine tıklayın.
4. Ardından, değerlerini tek bir kayıtta birleştirmek istediğiniz sütuna tıklayın ve Birleştirme Türü seçeneğine tıklayarak Yalnızca ayırıcı ile birleştir seçeneğini belirleyin. Sonra, sağ listeden birleştirilen değerleri ayırmak istediğiniz ayırıcıyı seçin. Ekran görüntüsüne bakın:
5. Ayarları tamamladıktan sonra Tamam düğmesine tıklayın; verileriniz Anahtar Sütun temel alınarak birleştirilecek ve belirlediğiniz ayırıcılarla ayrılacaktır.
Not: Diğer sütunlar için işlem ayarlamaya gerek duymuyorsanız, varsayılan ayarı koruyun.
Birden fazla Yinelenen satır'yi birleştirin ve değerlerin toplamını/ortalamasını Kutools for Excel ile alın
Bu çok fonksiyonlu Gelişmiş Satırları Birleştir aracıyla yinelenen satırları birleştirebilir ve aynı zamanda değerler üzerinde bazı hesaplamalar da yapabilirsiniz.
1. Yinelenenleri birleştirmek istediğiniz aralık verisini seçin.
2.Gelişmiş Satırları Birleştiriletişim kutusuna gidin;
- (1.) Hesaplamaları diğer sütun değerlerine göre yapmak istediğiniz Anahtar Sütun olarak bir sütun adı seçin ve ardından Anahtar Sütun;
- (2.) Değerleri için bazı hesaplamalar yapmanız gereken sütunu seçin ve ardından Birleştirme Türü > Birleştirerek hesapla seçeneğine tıklayın; ardından ihtiyacınız olan hesaplama türünü seçin. Bu örnekte Toplam seçtim. Ekran görüntüsüne bakın:
3. Diğer sütunlar için işlem ayarlamaya gerek duymuyorsanız, varsayılan ayarları koruyun ve ardından Tamam düğmesine tıklayın; böylece A sütunundaki yinelenen değerler birleştirilecek ve B sütunundaki karşılık gelen değerler toplanacaktır. Ekran görüntülerine bakın:
 | |  |
Notlar:
1. Başlıkları içerir seçeneğini işaretlerseniz, bu aracı uygularken aralığın başlık satırı (ilk satır) dikkate alınmaz.
2. Biçimlendirilmiş değerleri kullan: Yinelenen hücreleri birleştirdikten sonra değerlerin biçimlendirmesini korur.
3. Bu araç, filtrelenmiş verilerle kullanılamaz.
Bu Gelişmiş Satırları Birleştir özelliğinin ayrıntılarını öğrenmek için tıklayın.
İlgili makale:
Yinelenen satır birleştirin ve değerleri toplayın
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar