Comment supprimer les lignes en double mais conserver celle avec la dernière date dans Excel?
J'ai une plage de données qui contient des valeurs en double dans la colonne A et dans la colonne B est remplie avec une date, maintenant, je dois supprimer les lignes en double dans la colonne A mais conserver la dernière date de la colonne B correspondante comme illustré ci-dessous , avez-vous de bonnes idées pour résoudre ce problème dans Excel rapidement et facilement?
Supprimez les valeurs en double et conservez la date la plus récente dans une autre colonne avec Kutools for Excel
Supprimer les valeurs en double et conserver la date la plus récente dans une autre colonne avec le code VBA
Le code VBA suivant peut vous aider à supprimer les cellules en double et à conserver la dernière date d'une autre colonne, procédez comme suit:
1. Maintenez le ALT + F11 clés, et il ouvre le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Module, puis collez la macro suivante dans le Module Fenêtre.
Code VBA: supprimez les valeurs en double et conservez la date la plus récente
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. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage de données que vous souhaitez utiliser, voir capture d'écran:
4. Et puis cliquez OK, les valeurs en double dans la colonne A ont été supprimées et la dernière date dans la colonne B est conservée selon vos besoins. Voir la capture d'écran:
Notes: Pour appliquer correctement le code ci-dessus, la colonne contenant des valeurs en double doit être située à gauche de la colonne de date.
Supprimez les valeurs en double et conservez la date la plus récente dans une autre colonne avec Kutools for Excel
Si vous n'êtes pas familier avec le code, ne vous inquiétez pas, le puissant utilitaire- Lignes de combinaison avancées of Kutools for Excel peut vous aider à résoudre cette tâche avec facilité.
Kutools for Excel : avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation en 30 jours. |
Après l'installation de Kutools for Excel, procédez comme suit:
1. Sélectionnez la plage de données pour laquelle vous souhaitez supprimer les doublons et conserver la date la plus récente d'une autre colonne.
2. Puis clique Kutools > Fusionner et fractionner > Lignes de combinaison avancées, voir capture d'écran:
3. Dans le Combiner des lignes en fonction de la colonne boîte de dialogue, cliquez sur le nom de la colonne dont vous souhaitez supprimer les valeurs en double, puis cliquez sur Clé primaire, voir capture d'écran:
4. Continuez à cliquer sur un autre nom de colonne dont vous souhaitez conserver la date la plus récente, puis cliquez sur Calculer > Max, voir capture d'écran:
5. Et puis cliquez Ok pour fermer cette boîte de dialogue, et maintenant, vous pouvez voir que les noms en double dans la colonne A ont été supprimés et ne conserver que la dernière date dans la colonne B correspondante, voir capture d'écran:
Téléchargez et essayez gratuitement Kutools for Excel Now!
Démo : supprimez les valeurs en double et conservez la date la plus récente dans une autre colonne avec Kutools for Excel
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!