¿Cómo combinar varias filas en una basada en duplicados en Excel?
Quizás tengas los siguientes datos en la captura de pantalla, en la columna A del nombre del producto, hay algunos elementos duplicados, y ahora necesitas eliminar las entradas duplicadas en la columna A pero combinar los valores correspondientes en la columna B, ver capturas de pantalla:
![]() | ![]() | ![]() |
¿Tienes algunas formas efectivas de resolver esta tarea?
Combinar varias filas duplicadas en una con código VBA
Combinar varias filas duplicadas en una Kutools para Excel
Combinar varias filas duplicadas y sumar/promediar los valores con Kutools para Excel
Combinar varias filas duplicadas en una con código VBA
El siguiente código VBA puede ayudarte a combinar filas duplicadas basadas en el valor de la columna A, y el siguiente código solo se aplica para dos columnas. Entonces, si tienes datos en dos columnas, este código te será útil.
1. Mantén presionadas las teclas ALT + F11, y se abrirá la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.
Código VBA: combinar múltiples filas en una
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. Luego presiona la tecla F5, y aparecerá un cuadro de diálogo para recordarte que selecciones un rango que necesitas combinar. Ver captura de pantalla:
4. Luego haz clic en Aceptar, los valores en la columna B se habrán combinado en un registro y separados por espacios.
Notas:
1. Este código puede destruir los datos originales, cuando lo uses, es mejor hacer una copia de seguridad de los datos primero.
2. Este código solo se aplica para dos columnas, si tienes más de dos columnas, este código solo combinará las primeras dos columnas y eliminará los datos de otras columnas. Cuando uses este código, debes tener cuidado.
Combinar varias filas duplicadas en una Kutools para Excel
Ahora que el código anterior tiene algunas limitaciones y riesgos, ¿hay una manera práctica y segura de realizar esta tarea? Con la utilidad Combinar filas avanzado de Kutools para Excel, puedes eliminar rápidamente múltiples filas duplicadas en las columnas en las que te basaste y fusionar o hacer algunos cálculos para otros registros en celdas apropiadas.
Kutools para Excel incluye más de 300 herramientas útiles para Excel. Prueba gratis sin limitaciones durante 30 días. Consíguelo ahora.
Después de instalar Kutools para Excel, por favor sigue los siguientes pasos:
1. Selecciona el rango de datos que deseas combinar duplicados.
2. Luego haz clic en Kutools > Combinar y dividir > Combinar filas avanzado.
3. En el cuadro de diálogo Combinar filas avanzado, selecciona el nombre de la columna como las columnas clave en las que deseas combinar valores basados, y luego haz clic en Columnas clave.
4. Luego sigue haciendo clic en la columna en la que necesitas combinar sus valores en un registro, y luego haz clic en Operaciones de combinación y elige Solo combinar con separador, y selecciona un separador que necesites para separar los valores combinados de la lista de la derecha. Ver captura de pantalla:
5. Después de terminar la configuración, haz clic en Aceptar, y tus datos se fusionarán basados en las columnas clave y separados por separadores.
Nota: Si no necesitas establecer operaciones para el resto de las columnas, simplemente mantén el estado predeterminado.
Combinar varias filas duplicadas y sumar/promediar los valores con Kutools para Excel
Con esta utilidad multifuncional Combinar filas avanzado, puedes combinar filas duplicadas y hacer algunos cálculos para los valores también.
1. Selecciona el rango de datos que deseas combinar duplicados.
2. Ve al cuadro de diálogo Combinar filas avanzado;
- (1.) Selecciona un nombre de columna como columna clave en la que deseas calcular otros valores de columna basados, y luego haz clic en Columnas clave;
- (2.) Selecciona la columna en la que necesitas hacer algunos cálculos para los valores, y luego haz clic en Operaciones de combinación > Combinar cálculo, luego elige un tipo de cálculo que necesites, en este caso, selecciono Suma. Ver captura de pantalla:
3. Si no necesitas establecer operaciones para el resto de las columnas, simplemente mantén el estado predeterminado, luego haz clic en Aceptar, y los valores duplicados en la columna A se fusionarán y sus valores correspondientes en la columna B se sumarán. Ver capturas de pantalla:
![]() | ![]() | ![]() |
Notas:
1. Si marcas la opción Mis datos tienen encabezados, tus encabezados (la primera fila) del rango serán ignorados cuando apliques esta utilidad.
2. Usar valores formateados: mantendrá el formato de los valores después de combinar las celdas duplicadas.
3. Esta utilidad no está disponible para filtrar datos.
Haz clic para saber más sobre esta función Combinar filas avanzado.
Artículo relacionado:
Combinar filas duplicadas y sumar los valores
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!