Excel'de aynı kimliğe/adı sahip satırları nasıl birleştirirsiniz?

Excel'de aynı kimliğe veya ada sahip satırları birleştirmek, verileri düzenlemek ve özetlemek için yaygın bir iştir. Satış kayıtlarını birleştirme, anket sonuçlarını özetleme veya veri setlerini düzenleme işleminde, Excel'in yerleşik araçları kullanılarak bu süreç kolaylaştırılabilir. İşte size aynı kimliğe veya ada sahip satırları verimli bir şekilde birleştirmenize yardımcı olacak detaylı bir kılavuz.
VBA ile aynı kimliğe/adı sahip satırları birleştirme
Bu yöntem, belirtilen seçimdeki aynı kimliğe veya ada sahip tüm satırları hızlıca birleştirmek için bir VBA tanıtacaktır. Lütfen şu adımları izleyin:
1. Microsoft Visual Basic for Applications penceresini açmak için "Alt + F11" tuşlarına basın.
2. "Ekle" > "Modül" seçeneğine tıklayın ve ardından VBA kodunu Modül penceresine yapıştırın.
VBA: Excel'de Aynı Kimliğe/Ada Sahip Satırları Birleştirme
Sub Consolidate_Rows()
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Value
Else
xRg(I, K) = xRg(I, K).Value & "," & xRg(J, K).Value
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub
3. Bu VBA'yı çalıştırmak için F5 tuşuna basın veya Çalıştır düğmesine tıklayın.
4. Açılan Kutools for Excel iletişim kutusunda, birleştireceğiniz satırları seçin ve Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:
Şimdi, belirtilen aralıktaki satırların aynı kimliğe göre virgülle birleştirildiğini göreceksiniz. Ekran görüntüsüne bakın:
Kutools for Excel ile aynı kimliğe/adı sahip satırları birleştirme
VBA kodlaması konusunda kendinizi rahat hissetmiyorsanız endişelenmeyin—Kutools for Excel, süreci basitleştiren "Gelişmiş Satırları Birleştir" özelliğini sunar. Karmaşık işlemlere gerek olmadan, birkaç tıklama ile aynı kimliğe veya ada sahip satırları hızlıca birleştirebilirsiniz. Bu güçlü araç ayrıca sütun birleştirme, toplama, sayma, ortalama alma ve daha fazlasını destekler, böylece tüm farklı veri işleme ihtiyaçlarınız için mükemmel bir çözüm sunar.
1. Birleştireceğiniz veri aralığını seçin ve "Kutools" > "Birleştir ve Böl" > "Gelişmiş Satırları Birleştir" seçeneğine tıklayın. Ekran görüntüsüne bakın:
2. "Gelişmiş Satırları Birleştir" iletişim kutusunda lütfen aşağıdaki işlemleri belirtin:
- Diğer verileri birleştireceğiniz kimlik veya ad sütununu seçin, ardından "Hesaplama" açılır menüsünden "Anahtar" seçeneğini seçin;
- Ardından, diğer sütun adını seçin ve "Hesaplama" alanındaki açılır listeye tıklayın ve "Birleştir" bölümünden bir ayraç seçin. Birleştirmek istediğiniz diğer sütunlar için bu adımı tekrarlayın;
- Tamam düğmesine tıklayın.İpucu: Birleştirme sırasında hücre biçimlendirmesini korumanız gerekiyorsa, lütfen "Biçimlendirilmiş değerleri kullan" seçeneğini işaretleyin.
Şimdi, seçilen satırların sipariş kimliğine göre birleştirildiğini göreceksiniz. Ekran görüntüsüne bakın:
Kutools for Excel - Excel'i 300'den fazla temel araçla güçlendirin. Sürekli ücretsiz AI özelliklerinden yararlanın! Hemen Edinin
Bu yöntemleri takip ederek, Excel'de aynı kimliğe veya ada sahip satırları kolayca birleştirebilir, zaman kazanabilir ve doğruluğu sağlayabilirsiniz. Verilerinize ve hedeflerinize en uygun yaklaşımı seçin! Eğer daha fazla Excel ipucu ve hilesi keşfetmeye ilgi duyuyorsanız, web sitemiz binlerce öğretici sunarak Excel'i ustalaşmanızda size yardımcı olacaktır.
İlgili makaleler:
Excel'de numara/tarih biçimlendirmesini koruyarak nasıl birleştirirsiniz?
Excel'de başka bir sayfadan/farklı sayfalardan hücreleri nasıl birleştirirsiniz?
En İyi Ofis Verimlilik Araçları
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!