Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment supprimer les doublons mais garder la première instance dans Excel?

Disons qu'il existe une liste de valeurs dans votre feuille de calcul qui contient des doublons, maintenant, vous devez supprimer les doublons mais conserver la première ligne où la valeur dupliquée est trouvée. Dans cet article, nous allons vous montrer deux méthodes de suppression des doublons, mais conserver la première instance dans Excel.

Supprimez les doublons mais gardez la première instance avec le code VBA

Supprimez les doublons mais gardez la première instance avec Kutools pour Excel


Mettez facilement en surbrillance toutes les valeurs dupliquées ou uniques dans une liste

Avec Kutools for Excel's Sélectionnez les cellules dupliquées et uniques utilitaire, vous pouvez rapidement mettre en surbrillance toutes les valeurs dupliquées ou uqique dans une liste dans Excel.

Kutools for Excel comprend plus de 300 outils maniables Excel. Gratuit pour essayer sans limitation dans les jours 60. Téléchargez l'essai gratuit maintenant


Supprimez les doublons mais gardez la première instance avec le code VBA


Vous pouvez exécuter le code VBA ci-dessous pour supprimer les doublons mais conserver la première instance dans une colonne.

1. presse autre + F11 ouvrir le Microsoft Visual Basic pour applications boite de dialogue.

2. dans le Microsoft Visual Basic pour applications boîte de dialogue, cliquez sur insérer > Module. Ensuite, copiez et collez le code ci-dessous dans la fenêtre de code.

Code VBA: supprime les doublons mais garde la première instance

Sub TrimExcessSpaces()
	Dim Rng As Range
	Dim WorkRng As Range
	Dim dic As Variant
	Set dic = CreateObject("Scripting.Dictionary")
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng = WorkRng.Columns(1)
	For Each Rng In WorkRng.Cells
		dic(Rng.Value) = ""
	Next
	WorkRng.ClearContents
	WorkRng.Range("A1").Resize(UBound(dic.Keys) + 1, 1) = Application.WorksheetFunction.Transpose(dic.Keys)
End Sub

3. presse F5 clé pour exécuter le code. Dans le popping up KutoolsforExcel boîte de dialogue, sélectionnez la plage dans laquelle vous souhaitez supprimer les doublons, puis cliquez sur le OK bouton. Voir la capture d'écran:

Vous pouvez maintenant voir toutes les lignes dupliquées sauf que les premiers enregistrements sont supprimés de la plage de colonnes sélectionnée. Voir la capture d'écran:


Supprimez les doublons mais gardez la première instance avec Kutools pour Excel

À côté du code VBA, vous pouvez utiliser Sélectionnez les cellules dupliquées et uniques utilité de Kutools for Excel complément pour supprimer facilement les doublons mais conserver les premières instances dans Excel.

Kutools for Excel : avec plus de 300 compléments Excel pratiques, gratuit pour essayer sans limitation dans 60 jours.

1. Sélectionnez la plage dans laquelle vous souhaitez supprimer les doublons, mais conservez les premières occurrences. Puis clique Kutools > Ou sélectionner > Sélectionnez les cellules dupliquées et uniques. Voir la capture d'écran:

2. dans le Sélectionnez les cellules dupliquées et uniques boîte de dialogue, sélectionnez le Duplicates (sauf 1st un) option, puis cliquez sur le OK bouton. Voir la capture d'écran:

doc supprimer les doublons1

3. Dans ce qui suit Sélectionnez les cellules dupliquées et uniques boîte de dialogue, cliquez sur OK.

doc supprimer les doublons1

4. Maintenant, les doublons sont sélectionnés sauf les premières instances, s'il vous plaît appuyez sur la Effacer clé pour supprimer les doublons sélectionnés.

Note: Si vous souhaitez supprimer les lignes en double, il vous suffit de vérifier Sélectionnez des lignes entières option dans la Sélectionnez les cellules dupliquées et uniques boîte de dialogue, puis appliquez le Effacer commande du menu clic droit pour supprimer l'ensemble des lignes en double.

Pointe.Si vous voulez avoir un essai gratuit de cet utilitaire, allez à téléchargez le logiciel librement d'abord, puis allez appliquer l'opération selon les étapes ci-dessus.


Supprimez les doublons mais gardez la première instance avec Kutools pour Excel

Kutools for Excel comprend plus de 300 outils maniables Excel. Gratuit pour essayer sans limitation dans les jours 60. Téléchargez l'essai gratuit maintenant!



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

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.
  • To post as a guest, your comment is unpublished.
    lelouch · 1 years ago
    I am trying to do something similar but not quite. I am trying to take the following where I indicates the next cell

    John I Red
    John I Blue
    John I Yellow

    Joe I Red
    Joe I Blue
    Joe I Yellow

    and turn it into

    John I Red
    I Blue
    I Yellow

    Joe I Red
    I Blue
    I Yellow

    Can you help on just keeping the first duplicate in a single cell only?