Bagaimana cara menggabungkan beberapa baris menjadi satu berdasarkan duplikat di Excel?
Mungkin, Anda memiliki data tangkapan layar berikut, di kolom Nama produk A, ada beberapa item duplikat, dan sekarang Anda perlu menghapus entri duplikat di kolom A tetapi menggabungkan nilai yang sesuai di kolom B, lihat tangkapan layar:
![]() |
![]() |
![]() |
Apakah Anda memiliki beberapa cara efektif untuk menyelesaikan tugas ini?
Gabungkan beberapa baris duplikat menjadi satu dengan kode VBA
Gabungkan beberapa baris duplikat menjadi satu Kutools for Excel
Gabungkan beberapa baris duplikat dan jumlahkan/rata-rata nilainya Kutools for Excel
Gabungkan beberapa baris duplikat menjadi satu dengan kode VBA
Kode VBA berikut dapat membantu Anda menggabungkan baris duplikat berdasarkan nilai kolom A, dan kode berikut ini hanya diterapkan untuk dua kolom. Jadi, jika Anda memiliki data dua kolom, kode ini akan membantu Anda.
1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.
Kode VBA: gabungkan beberapa baris menjadi satu
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. Lalu tekan F5 kunci, dan kotak prompt muncul untuk mengingatkan Anda untuk memilih rentang yang perlu Anda gabungkan. Lihat tangkapan layar:
4. Dan kemudian klik OK, nilai di kolom B telah digabungkan menjadi satu record dan dipisahkan oleh spasi.
Catatan:
1. Kode ini dapat merusak data asli, jika digunakan sebaiknya backup datanya terlebih dahulu.
2. Kode ini hanya berlaku untuk dua kolom, jika Anda memiliki lebih dari dua kolom, kode ini hanya akan menggabungkan dua kolom pertama dan menghapus data kolom lainnya. Saat Anda menggunakan kode ini, Anda harus berhati-hati.
Gabungkan beberapa baris duplikat menjadi satu Kutools for Excel
Sekarang kode di atas memiliki beberapa batasan dan risiko, apakah ada cara yang praktis dan aman untuk menyelesaikan pekerjaan ini? Dengan Kutools for Excel'S Lanjutan Gabungkan Baris utilitas, Anda bisa dengan cepat menghapus beberapa baris duplikat di kolom yang Anda berdasarkan dan menggabungkan atau melakukan beberapa penghitungan untuk rekaman lain ke dalam sel yang sesuai.
Kutools for Excel mencakup lebih dari 300 alat Excel yang praktis. Gratis untuk mencoba tanpa batasan dalam 30 hari. Dapatkan Sekarang.
Setelah menginstal Kutools for Excel, lakukan hal berikut:
1. Pilih rentang data yang ingin Anda gabungkan duplikatnya.
2. Lalu klik Kutools > Pengonversi Konten > Lanjutan Gabungkan Baris. Lihat tangkapan layar:
3. di Lanjutan Gabungkan Baris kotak dialog, pilih nama kolom sebagai kolom kunci yang ingin Anda gabungkan nilai berdasarkan, lalu klik Kolom kunci. Lihat tangkapan layar:
4. Lalu lanjutkan dengan mengklik kolom yang Anda perlukan untuk menggabungkan nilainya ke dalam satu record, lalu klik Gabungkan operasi Dan pilihlah Gabungkan hanya dengan pemisah, dan pilih satu pemisah yang Anda perlukan untuk memisahkan nilai gabungan dari daftar kanan. Lihat tangkapan layar:
5. Setelah menyelesaikan pengaturan, klik OK, dan data Anda akan digabungkan berdasarkan kolom kunci dan dipisahkan oleh pemisah.
Catatan: Jika Anda tidak perlu mengatur operasi untuk kolom lainnya, pertahankan status default.
Gabungkan beberapa baris duplikat dan jumlahkan/rata-rata nilainya Kutools for Excel
Dengan multifungsi ini Lanjutan Gabungkan Baris utilitas, Anda dapat menggabungkan baris duplikat dan melakukan beberapa kalkulasi untuk nilainya juga.
1. Pilih rentang data yang ingin Anda gabungkan duplikatnya.
2. Pergi ke Lanjutan Gabungkan Baris kotak dialog;
- (1.) Pilih nama kolom sebagai kolom kunci yang ingin Anda hitung berdasarkan nilai kolom lainnya, lalu klik Kolom kunci;
- (2.) Pilih kolom yang Anda perlukan untuk melakukan beberapa penghitungan nilai, lalu klik Gabungkan operasi > Gabungkan perhitungan, lalu pilih satu jenis kalkulasi yang Anda perlukan, dalam hal ini, saya pilih Jumlah. Lihat tangkapan layar:
3. Jika Anda tidak perlu mengatur operasi untuk kolom lainnya, cukup pertahankan status default, lalu klik OK, dan nilai duplikat di kolom A akan digabungkan dan nilai yang sesuai di kolom B akan ditambahkan. Lihat tangkapan layar:
![]() |
![]() |
![]() |
Catatan:
1. Jika Anda memeriksa Data saya memiliki tajuk opsi, header Anda (baris pertama) dari rentang tersebut akan diabaikan saat Anda menerapkan utilitas ini.
2. Gunakan nilai yang diformat: ini akan mempertahankan format nilai setelah menggabungkan sel duplikat.
3. Utilitas ini tidak tersedia untuk memfilter data.
Klik untuk mengetahui lebih banyak tentang fungsi Advanced Combine Rows ini.
Artikel terkait:
Gabungkan baris duplikat dan jumlahkan nilainya
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Canggih untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Office Tab Menghadirkan antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!








