¿Cómo condensar filas rápidamente en Excel según un mismo valor?
Condense filas según un valor con una tabla dinámica
Condense filas según un valor con Kutools para Excel
Condense filas según un valor con fórmulas
Condense y sume filas con una macro de VBA
Condensar filas según valor con tabla dinámica
La función de tabla dinámica de Excel está diseñada para resumir datos de forma rápida y eficiente, especialmente cuando necesitas condensar filas según valores duplicados en una columna y agregar datos numéricos en otra. Es ideal para usuarios que buscan una tabla resumen interactiva con opciones para agrupar, filtrar y analizar aún más los resultados. Las tablas dinámicas destacan por su capacidad para manejar grandes volúmenes de datos y actualizarse con mínimo esfuerzo.
1. Seleccione todo el rango de sus datos, incluidas las cabeceras de columna, y vaya a la pestaña Insertar en la parte superior de la Cinta de opciones. A continuación, haga clic en Tabla dinámica. Aparecerá el cuadro de diálogo «Crear tabla dinámica»: elija si desea colocar la tabla dinámica en una hoja de cálculo nueva o en una hoja de cálculo existente, según su flujo de trabajo, y luego haga clic en Aceptar. Vea la captura de pantalla:
2. En el panel «Campos de tabla dinámica», arrastre el campo Pedido al área Filas y el campo Ventas al área Valores. Así se generará automáticamente una tabla resumen con cada pedido único y la suma correspondiente de sus ventas.
Consejo: De forma predeterminada, la tabla dinámica suma la columna numérica. Si desea un cálculo distinto, como Promedio, Contar, Mín o Máx, haga clic en la flecha desplegable junto a «Suma de Ventas» en la sección «Valores», seleccione Configuración de valor y elija la operación adecuada.
Ventajas:
- Ideal para análisis dinámico y exploración de datos.
- Se actualiza automáticamente cuando cambian sus datos de origen.
- Ofrece múltiples opciones para filtrar, agrupar y personalizar el diseño.
- Requiere familiaridad con los controles de tablas dinámicas para realizar personalizaciones avanzadas.
Condensar filas según valor con Kutools para Excel
«Kutools para Excel» proporciona un método optimizado para combinar Fila duplicada y resumir sus datos, lo que resulta especialmente útil para tareas repetitivas o extensas. Esta herramienta es ideal para usuarios que gestionan grandes volúmenes de información y necesitan transformar o resumir datos sin realizar trabajos manuales complejos.
1. Seleccione el rango de datos que desea condensar. A continuación, vaya a Kutools en la barra de herramientas y seleccione Combinar y dividir > Combinar filas avanzado.
2. Aparecerá el cuadro de diálogo «Combinar filas avanzado». Deberá:
- Haga clic en la cabecera de la columna que contiene entradas duplicadas y configúrela como clave principal. Así indicará a Excel qué valores debe usar para agrupar los datos.
- Haga clic en la cabecera de la columna que contiene los valores numéricos que desea agregar. En el cuadro desplegable Operación, seleccione un cálculo adecuado en la sección «Calcular», como Suma, Promedio, Máx o Mín, según sus necesidades.
- Una vez especificados estos ajustes, haga clic en Aceptar para procesar la combinación.
3. Las filas se condensarán y se aplicará el cálculo especificado a la columna seleccionada.
Consejos prácticos:
- Si su conjunto de datos incluye celdas vacías o texto no numérico, asegúrese de que la columna de cálculo contenga únicamente números para evitar resultados inesperados.
- Se recomienda especialmente usar Kutools para conjuntos de datos grandes que serían engorrosos de combinar manualmente.
- Extremadamente rápido y sencillo para el procesamiento por lotes.
- Permite personalizar al completo cómo se combinan los duplicados y qué columnas se agregan.
- Requiere tener instalado el complemento Kutools para Excel.
- Modifique su rango de datos original (puede deshacerlo después con Ctrl+Z si no lo ha guardado).
Kutools para Excel: potencie Excel con más de 300 herramientas esenciales, agilice y simplifique su trabajo, y aproveche las funciones de IA para un procesamiento de datos más inteligente y una mayor productividad.Consígalo ahora
Condensar filas según valor con fórmulas
Las fórmulas de Excel ofrecen una forma flexible de resumir datos sin necesidad de reestructurar tu hoja de cálculo. Este método es ideal para tareas personalizadas, conjuntos de datos pequeños o cuando quieres condensar información en un área independiente, dejando intacta la fuente. Fórmulas populares como SUMAR.SI permiten calcular automáticamente los totales para cada valor único.
1. Elija una celda vacía junto a su rango de datos —por ejemplo, la celda D2— e introduzca la siguiente fórmula. Pulse las teclas Mayús + Ctrl + Intro para calcular el primer valor único.
=INDEX($A$2:$A$12,MATCH(0,COUNTIF($D$1:D1,$A$2:$A$12),0))
Nota: Ajuste los rangos en la fórmula: «A2:A12» hace referencia a la lista que contiene posibles duplicados y «D1» es la celda inicial de sus resultados. Asegúrese de que las referencias de celda coincidan con su hoja real y utilice referencias absolutas si va a copiar las fórmulas a otras celdas.
2. Seleccione la celda D2 (donde introdujo la fórmula) y arrastre el controlador de autorrelleno hacia abajo hasta el final de su lista o hasta que aparezca un valor de error, lo que indicará que ya se han mostrado todas las entradas únicas.
3. Elimine todos los mensajes de error que aparezcan al final de su lista. A continuación, vaya a la celda adyacente en el área de resultados (por ejemplo, E2), introduzca la siguiente fórmula para sumar los valores de cada entrada, pulse Intro y rellene hacia abajo para aplicarla al resto de filas.
=SUMIF($A$2:$A$12,D2,$B$2:$B$12)
Nota: «A2:A12» es la columna de origen en la que desea buscar duplicados; «D2» es la celda que contiene el primer valor único, y «B2:B12» es la columna que incluye las ventas u otros valores numéricos. Ajuste estas referencias según su conjunto de datos.
Consejos y precauciones:
- Las fórmulas no modifican los datos originales y resultan ideales para informes resumidos lado a lado.
- Si lo desea, puede utilizar otras funciones de agregación, como CONTAR.SI, PROMEDIO.SI, etc., según las necesidades de su análisis.
Condensar y sumar filas con una macro de VBA
Cuando trabaje con conjuntos de datos especialmente grandes o necesite condensar filas repetidamente según valores idénticos, automatizar el proceso mediante una macro de VBA puede ahorrarle una gran cantidad de tiempo y esfuerzo. Este enfoque le permite procesar por lotes cientos o incluso miles de filas, o integrar esta funcionalidad en un flujo de trabajo personalizado. La solución de VBA que se ofrece aquí suma los valores de una columna especificada para cada elemento único de otra columna y muestra los resultados condensados en una hoja de cálculo nueva, manteniendo intactos sus datos originales.
1. Abra Excel y pulse Alt+F11 para abrir el editor de Visual Basic para Aplicaciones. En el editor de VBA, haga clic en Insertar > Módulo para crear un nuevo módulo de código. Copie y pegue el siguiente código en la ventana del módulo:
Sub CondenseAndSumRows()
Dim srcWS As Worksheet, destWS As Worksheet
Dim lastRow As Long, i As Long
Dim dict As Object
Dim keyCol As String, sumCol As String
Dim dataRange As Range, cell As Range
On Error Resume Next
Set dict = CreateObject("Scripting.Dictionary")
Set srcWS = Application.ActiveSheet
' Prompt to select the whole data range
Set dataRange = Application.InputBox("Select full data range including headers", "KutoolsforExcel", Type:=8)
keyCol = Application.InputBox("Select header name for key/duplicate column", "KutoolsforExcel", Type:=2)
sumCol = Application.InputBox("Select header name for numeric/sum column", "KutoolsforExcel", Type:=2)
If dataRange Is Nothing Or keyCol = "" Or sumCol = "" Then Exit Sub
' Get column numbers by header
Dim keyColNum As Integer, sumColNum As Integer
For i = 1 To dataRange.Columns.Count
If dataRange.Cells(1, i).Value = keyCol Then
keyColNum = i
End If
If dataRange.Cells(1, i).Value = sumCol Then
sumColNum = i
End If
Next i
If keyColNum = 0 Or sumColNum = 0 Then
MsgBox "Column headers not found. Check header spelling!", vbExclamation
Exit Sub
End If
' Summing values for each key
For i = 2 To dataRange.Rows.Count
If Not IsNumeric(dataRange.Cells(i, sumColNum).Value) Then
' Ignore non-numeric, prevent errors
GoTo SkipRow
End If
If dict.Exists(dataRange.Cells(i, keyColNum).Value) Then
dict(dataRange.Cells(i, keyColNum).Value) = dict(dataRange.Cells(i, keyColNum).Value) + dataRange.Cells(i, sumColNum).Value
Else
dict(dataRange.Cells(i, keyColNum).Value) = dataRange.Cells(i, sumColNum).Value
End If
SkipRow:
Next i
' Output results to new worksheet
Set destWS = Worksheets.Add
destWS.Name = "Condensed Summary"
destWS.Cells(1, 1).Value = keyCol
destWS.Cells(1, 2).Value = "Total " & sumCol
i = 2
Dim k
For Each k In dict.Keys
destWS.Cells(i, 1).Value = k
destWS.Cells(i, 2).Value = dict(k)
i = i + 1
Next k
MsgBox "Condensing complete! Check the worksheet 'Condensed Summary'.", vbInformation
End Sub2. A continuación, ejecute la macro haciendo clic en el 
botón o pulsando F5 mientras el módulo está seleccionado. Aparecerá un cuadro de diálogo que le pedirá que seleccione el rango completo de sus datos (incluidos los encabezados). Luego, elija los encabezados de columna correspondientes a su columna clave (duplicados) y a su columna numérica (suma). Siga las indicaciones para continuar: la macro calculará automáticamente los totales por valor único y escribirá los resultados en una hoja de cálculo nueva denominada "Resumen condensado". Así, su hoja original permanecerá intacta como medida de seguridad.
Resolución de problemas:
- Si recibe un error de «cabeceras de columna no encontradas», asegúrese de que las cabeceras introducidas coincidan exactamente con las de la hoja de datos (distingue mayúsculas y minúsculas).
- Si no se crea ningún resumen, verifique que el Seleccionar rango incluya tanto cabeceras como datos, y que haya al menos un valor numérico en la columna de agregación.
Ventajas:
- Se puede reutilizar y adaptar fácilmente a nuevos conjuntos de datos.
- Es rápido incluso con archivos muy grandes y no necesita complementos externos.
- Puede ampliarse para integrar otros campos o automatizar cálculos adicionales en el futuro.
Resumen
Cuando necesite combinar o analizar filas en Excel en función de valores compartidos, la elección del método adecuado dependerá de sus objetivos y de la estructura de su libro de trabajo:
- Las tablas dinámicas son ideales para análisis interactivos y resúmenes rápidos, especialmente en entornos con datos en constante evolución.
- Kutools para Excel ofrece funciones intuitivas y personalizadas de combinación, perfectas para usuarios que realizan tareas repetitivas sin necesidad de programar.
- Las fórmulas ofrecen la máxima flexibilidad, son sencillas de auditar y se adaptan perfectamente a informes estáticos o lógica personalizada.
- Las macros de VBA son ideales para automatizar operaciones repetitivas o masivas y generar informes resumidos sin intervención manual.
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos