¿Cómo eliminar filas duplicadas conservando únicamente la que tenga la fecha más reciente en Excel?
Tengo un rango de datos con valores duplicados en la columna A y fechas en la columna B. Necesito eliminar las filas duplicadas de la columna A, pero conservando la fecha más reciente de la columna B correspondiente, tal como se muestra en la siguiente captura de pantalla. ¿Tiene alguna solución rápida y sencilla para este problema en Excel?
Eliminar Valores duplicados y conservar la fecha más reciente en otra columna con código VBA
Eliminar Valores duplicados y conservar la fecha más reciente en otra columna con Kutools para Excel
Eliminar Valores duplicados y conservar la fecha más reciente en otra columna con código VBA
El siguiente código VBA le permite eliminar celdas duplicadas y conservar la fecha más reciente de otra columna. Siga estos pasos:
1. Mantenga pulsadas las teclas ALT + F11 y se abrirá la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo y, a continuación, pegue la siguiente macro en la ventana del Módulo.
Código VBA: Eliminar Valores duplicados y conservar la fecha más reciente
Sub test()
'updateby Extendoffice
Dim xRng As Range
Dim xTxt As String
On Error Resume Next
xTxt = Application.ActiveWindow.RangeSelection.Address
Set xRng = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRng Is Nothing Then Exit Sub
If (xRng.Columns.Count < 2) Or (xRng.Rows.Count < 2) Then
MsgBox "the used range is invalid", , "Kutools for Excel"
Exit Sub
End If
xRng.Sort key1:=xRng.Cells(1, 1), Order1:=xlAscending, key2:=xRng.Cells(1, 2), Order2:=xlDescending, Header:=xlGuess
xRng.RemoveDuplicates Columns:=1, Header:=xlGuess
End Sub
3. A continuación, pulse la tecla F5 para ejecutar este código. Aparecerá un cuadro de diálogo que le recordará que seleccione el rango de datos que desea utilizar; consulte la captura de pantalla:
4. A continuación, haga clic en Aceptar; se han eliminado los valores duplicados de la columna A y se ha conservado la fecha más reciente de la columna B, tal como necesitaba. Consulte la captura de pantalla:
Nota: Para aplicar correctamente el código anterior, la columna que contiene los valores duplicados debe estar situada a la izquierda de la columna de fechas.
Eliminar Valores duplicados y conservar la fecha más reciente en otra columna con Kutools para Excel
Si no está familiarizado con el código, no se preocupe. La potente utilidad Combinar filas avanzado de Kutools para Excel le ayudará a realizar esta tarea con facilidad.
Tras instalar Kutools para Excel, siga estos pasos:
1. Seleccione el rango de datos del que desea eliminar duplicados y conservar la fecha más reciente de otra columna.
2.A continuación, haga clic en Kutools>Combinar y dividir>Combinar filas avanzado; consulte la captura de pantalla:
3. En el cuadro de diálogo Combinar filas basado en columna, haga clic en el nombre de la columna de la que desea eliminar los valores duplicados y, a continuación, haga clic en Clave principal; consulte la captura de pantalla:
4. A continuación, haga clic en otro nombre de columna del que desee conservar la fecha más reciente y, después, haga clic en Calcular > Máx; consulte la captura de pantalla:
5. A continuación, haga clic en el botón Aceptar para cerrar este cuadro de diálogo. Ahora verá que los nombres duplicados de la columna A se han eliminado y que solo se conserva la fecha más reciente en la columna B correspondiente; consulte la captura de pantalla:
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
Demostración: Eliminar Valores duplicados y conservar la fecha más reciente en otra columna con Kutools para Excel
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