Comment supprimer les doublons dans Excel en utilisant VBA (3 méthodes rapides)

  • Partage Ça
Hugh West

L'une des activités les plus importantes dans Excel est de supprimer les doublons Aujourd'hui, je vais vous montrer comment supprimer les doublons dans Excel en utilisant uniquement VBA.

Télécharger le cahier d'exercices

Supprimer les doublons dans Excel avec VBA.xlsm

3 méthodes rapides pour utiliser VBA dans Excel pour supprimer les doublons

Ici nous avons un ensemble de données avec le Noms, identifications, Marques, et Grades dans l'examen de certains élèves d'une école appelée Sunflower Kindergarten.

Si vous regardez attentivement, vous constaterez que certains noms ont été répétés par erreur.

Aujourd'hui, notre objectif est de supprimer les valeurs en double à l'aide d'Excel VBA.

1. utiliser VBA pour supprimer les doublons d'une plage de cellules fixes

Tout d'abord, nous allons essayer de supprimer les noms en double en utilisant une plage de cellules fixes dans le VBA code.

Ici, notre ensemble de données est l'intervalle B3:E15 dans le classeur (y compris le En-têtes de colonne ).

Nous allons utiliser cette plage de cellules fixes dans le code ici.

Étape 1 :

➤ Ouvrir un nouveau VBA et insérer un nouveau module (Cliquez ici pour voir comment ouvrir et insérer un nouveau module VBA dans Excel).

➤ Insérez ce code dans le module :

Code :

 Sub Remove_Duplicates() Range("A3:E14").RemoveDuplicates Columns:=1, Header:=xlYes End Sub 

➤ Il produit une macro appelée Supprimer les doublons . A3:E14 est l'étendue de mon ensemble de données, et je veux supprimer les lignes en double sur la base de Colonne 1 Vous utilisez le vôtre.

Étape 2 :

➤ Revenez à votre feuille de calcul et exécutez cette macro (Cliquez ici pour voir comment exécuter une macro).

➤ Il va supprimer les lignes avec des doublons dans la colonne 1 ( Nom de l'étudiant).

Lire la suite : Comment supprimer les doublons dans Excel mais en garder un (7 méthodes)

2. insérer des codes VBA pour supprimer les doublons de la plage de cellules sélectionnée

Nous allons maintenant essayer de construire une macro capable de supprimer les doublons de toute plage de cellules sélectionnée dans la feuille de calcul.

Étape 1 :

➤ Ouvrir un nouveau VBA et insérez un autre nouveau module.

➤ Insérez ce code dans le module :

Code :

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=1, Header:=xlYes End Sub 

➤ Il produit une macro appelée Supprimer les doublons Je veux supprimer les lignes en double sur la base des critères suivants Colonne 1 Vous utilisez le vôtre.

Étape 2 :

➤ Reviens à ta feuille de travail.

➤ Sélectionnez votre ensemble de données et exécutez cette macro.

➤ Il exécutera la même chose que ce qui a été fait ci-dessus. Supprimez les lignes avec des doublons dans la colonne 1 ( Nom de l'étudiant).

Lire la suite : Comment supprimer les lignes en double dans Excel (3 façons)

Lectures similaires

  • Comment supprimer les doublons d'une colonne dans Excel (3 méthodes)
  • Excel VBA : supprimer les doublons d'un tableau (2 exemples)
  • Comment supprimer les doublons et conserver la première valeur dans Excel (5 méthodes)
  • Supprimer les lignes en double, sauf la première occurrence, dans Excel (7 façons)
  • Comment supprimer les deux doublons dans Excel (5 façons simples)

3. intégrer une macro VBA pour supprimer les doublons de plusieurs colonnes

Jusqu'à présent, nous avons supprimé les lignes qui ont des doublons dans la colonne 1 ( Nom de l'élève ).

Mais en fait, le nom de deux élèves peut être le même, cela ne signifie pas toujours qu'il a été ajouté par erreur si deux noms sont identiques.

Mais si les identifiants de deux étudiants sont également identiques, alors il s'agit du même étudiant. Dans ce cas, la ligne doit être supprimée.

Cette fois, nous allons développer une macro qui supprimera la ligne si le nom et l'ID de deux lignes sont identiques.

Étape 1 :

➤ Ouvrir un nouveau VBA et insérez un autre nouveau module.

➤ Insérez ce code dans le module :

Code :

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes End Sub 

➤ Il produit une macro appelée Supprimer les doublons Je veux supprimer les lignes en double sur la base des critères suivants Colonne 1 et 2 (Nom et identification) Vous utilisez le vôtre.

Étape 2 :

➤ Reviens à ta feuille de travail.

➤ Sélectionnez votre ensemble de données et exécutez cette macro.

➤ Cette fois, il ne supprimera les lignes que si le nom et l'identifiant de l'étudiant sont identiques.

Note : Ici, il n'a pas supprimé Jennifer Marlo parce que les identifiants des deux étudiants sont différents, c'est-à-dire qu'il s'agit de deux étudiants différents.

Lire la suite : Excel VBA : supprimer les doublons en comparant plusieurs colonnes (3 exemples)

Conclusion

Grâce à ces méthodes, vous pouvez supprimer les doublons d'un ensemble de données dans Excel à l'aide de VBA. Si vous rencontrez des problèmes, n'hésitez pas à nous en faire part.

Hugh West est un formateur et analyste Excel très expérimenté avec plus de 10 ans d'expérience dans l'industrie. Il est titulaire d'un baccalauréat en comptabilité et finance et d'une maîtrise en administration des affaires. Hugh a une passion pour l'enseignement et a développé une approche pédagogique unique qui est facile à suivre et à comprendre. Sa connaissance approfondie d'Excel a aidé des milliers d'étudiants et de professionnels du monde entier à améliorer leurs compétences et à exceller dans leur carrière. Grâce à son blog, Hugh partage ses connaissances avec le monde, offrant des tutoriels Excel gratuits et une formation en ligne pour aider les particuliers et les entreprises à atteindre leur plein potentiel.