Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo eliminar filas duplicadas y mantener los valores más altos solo en Excel?

Por ejemplo, tiene una tabla de compras en Excel como la primera captura de pantalla que se muestra. Ahora debe eliminar las filas duplicadas en función de la columna Fruta y mantener los valores más altos de las frutas correspondientes en la columna Importe como la segunda captura de pantalla que se muestra. ¿Alguna solución puedes pensar? Este artículo compartirá dos trucos para resolverlo.

Elimine filas duplicadas y mantenga los valores más altos solo con VBA

Elimine las filas duplicadas y mantenga los valores más altos solo con Kutools para Excel

Elimine fácilmente filas duplicadas según criterios en una columna y solo mantenga los valores más altos en Excel

Kutools para Excel Filas de combinación avanzadas la utilidad puede ayudar a los usuarios de Excel a encontrar rápidamente el valor máximo del valor mínimo de cada elemento en otra columna con facilidad. Función completa de prueba gratuita 60-day!

Avanzado combinar filas máx.

Esta utilidad avanzada Combinar filas también puede combinar filas y valores separados por marcas específicas, o combinar filas y calcular sus sumas, cantidad de apariciones, valores máximos / mínimos, promedios, etc.

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las características avanzadas de 300 a Excel y aumenta su productividad en 80%
  • Super Formula Bar (edite fácilmente múltiples líneas de texto y fórmulas); Diseño de lectura (lea y edite fácilmente un gran número de celdas); Pegar en rango filtrado ...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combine filas duplicadas y suma / promedio ... Prevenga celdas duplicadas; Comparar rangos ...
  • Seleccione Filas duplicadas o únicas; Seleccione Filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta de varias celdas sin cambiar la referencia de fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, casillas de verificación y más ...
  • Favorito e inserte rápidamente fórmulas, rangos, gráficos e imágenes; Cifrar celdas con contraseña; Crear lista de correo y enviar correos electrónicos ...
  • Extraer texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios ...
  • Super filtro (guardar y aplicar esquemas de filtro a otras hojas); Avanzado Ordenar por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF ...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.


Supongamos que tiene una tabla como se muestra a continuación. Y este método presentará una macro VBA para eliminar filas duplicadas basadas en una determinada columna y mantener los valores más altos solo en otra columna en Excel. Por favor haz lo siguiente:

1. presione el otro + F11 teclas simultáneamente para abrir la ventana Microsoft Visual Basic para Aplicaciones.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en la nueva ventana del Módulo de apertura.

VBA: eliminar filas duplicadas y mantener los valores más altos

Public Sub DelDupes()
Dim xFilterRg As Range
Dim xCriteriaRg As Range
Dim xAddress As String
Dim xSUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xFilterRg = Application.InputBox("Please select a range:", "Kutools for Excel", xAddress, , , , , 8)
If xFilterRg Is Nothing Then Exit Sub
Set xFilterRg = Application.Intersect(ActiveSheet.UsedRange, xFilterRg)
If xFilterRg Is Nothing Then Exit Sub
On Error GoTo 0
xSUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
Set xCriteriaRg = ActiveSheet.Cells(1, xFilterRg.Column + xFilterRg.Columns.Count).Resize(2)
xCriteriaRg.Resize(1).Offset(1).Formula = "=COUNTIF(" & xFilterRg(2, 1).Address & ":" & _
xFilterRg(2, 1).Address(False, False) & "," & _
xFilterRg(2, 1).Address(False, False) & ")>1"
With xFilterRg
.Sort key1:=xFilterRg.Cells(1, 1).Offset(0, 1), order1:=xlDescending, Header:=xlYes
.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=xCriteriaRg
.Offset(1).SpecialCells(xlCellTypeVisible).EntireRow.Delete
.Parent.ShowAllData
End With
xCriteriaRg.Clear
Application.ScreenUpdating = xSUpdate
End Sub

3. presione el F5 tecla o haga clic en corrida botón para ejecutar este VBA.

4. Ahora aparece un cuadro de diálogo. Seleccione las columnas por las que eliminará las filas duplicadas y reserve los valores más altos, y haga clic en OK botón.

En nuestro caso, eliminaremos las filas duplicadas por Fruit Column y mantendremos los valores más altos en Amount Column; por lo tanto, selecciono la columna Fruit y la columna Amount como se muestra en la captura de pantalla anterior.

Luego verá que las filas duplicadas se eliminan en función de la columna Fruta, y los valores más altos de las frutas correspondientes se guardan en la columna Cantidad. Ver captura de pantalla:

Notas:

(1) El rango especificado debe comenzar con la columna por la que eliminará las filas duplicadas.

(2) Este VBA solo puede mantener los valores más altos en la columna justo detrás de la columna que retiró, duplica las filas.

(3) Este VBA no funciona en Microsoft Excel 2007.


El VBA anterior puede no ser lo suficientemente fácil para algunos usuarios, y solo puede mantener los valores más altos en la columna detrás de la columna de criterios. Pero Kutools para Excel Filas de combinación avanzadas la utilidad te ayudará a resolver este problema fácilmente.

1. Seleccione la tabla para eliminar las filas duplicadas y mantener los valores más altos (seleccione A1: C24 en nuestro caso) y haga clic en Kutools > Contenido > Filas de combinación avanzadas.

2. En la ventana de diálogo Combinar filas basada en columna, configure de la siguiente manera:

(1) Seleccione la columna Fruta (para la cual eliminará las filas duplicadas), y luego haga clic en Clave primaria botón;

(2) Seleccione la columna Importe (en la que mantendrá los valores más altos), y luego haga clic Calcular > Max.

(3) Especifique reglas de combinación para otras columnas según lo necesite.

doc remove duplicates mantener el valor más alto 2

3. Haga clic en el Ok botón. Y verá que todas las filas duplicadas se eliminan en función de la columna de fruta y que solo se conservan los valores máximos de las frutas correspondientes en la columna Importe. Ver captura de pantalla:

El Filas de combinación avanzadas la utilidad de Kutools para Excel puede combinar fácilmente filas por una columna, y luego calcular otras columnas basadas en estas columnas también, como Suma, Cantidad, Máx., Mín., Producto, etc. Haga clic para la versión de prueba gratuita de 60 días, sin limitaciones.


En este video, Kutools y Kutools Más las pestañas son agregadas por Kutools for Excel. Si lo necesita, haga clic para Prueba gratuita de 60 días sin limitación!

Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.