Table des matières
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.xlsm3 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.