Le langage VBA comprend une fonction qui ne retient que les occurrences unique à partir d’une liste de données : il s’agit de l’instruction « RemoveDuplicates » (cette instruction est équivalente à « Données / Supprimer les doublons » dans le ruban Excel 2007).
Exemple d’une liste de données comprenant des doublons :
A | |
1 | 9 |
2 | 10 |
3 | 12 |
4 | 12 |
5 | 11 |
6 | 10 |
7 | 16 |
8 | 17 |
9 | 13 |
10 | 12 |
11 | 12 |
12 | 17 |
Code-source VBA :
Sub EnlèveDoublons() Selection.RemoveDuplicates Columns:=1, Header:=xlNo End Sub
Pour utiliser ce code, sélectionner les données (continues ici dans la plage de cellules A1:A12) puis lancer la macro VBA.
Résultat obtenu :
A | |
1 | 9 |
2 | 10 |
3 | 12 |
4 | 11 |
5 | 16 |
6 | 17 |
7 | 13 |
La liste obtenue ne comprend que les occurrences uniques de la table de départ.
Approfondir le sujet : programmer en VBA
The following two tabs change content below.
Après seize années passées en cabinet d’expertise-comptable et de commissariat aux comptes (où j’ai exercé comme expert-comptable et chef de mission audit), j’ai pris le poste de directeur comptable d’un groupe de distribution automobile en novembre 2014. Au cours de ma carrière, j’ai acquis une expérience significative en audit et en exploitation des systèmes d’information (analyse de données, automatisation des tâches, programmation informatique) au service de la production des comptes annuels et consolidés. C’est cette expérience personnelle et ma passion pour l’informatique que je partage sur ce blog.
Mon CV / Réalisations personnelles et projets informatiques / Ma collection / Me contacter
Derniers articles parBenoît RIVIERE (voir tous)
- Projet IXP (v1.2beta) : quelques nouvelles de mon interpréteur d’expressions - dimanche 1 décembre 2024
- Nouveautés de l’interpréteur de formules de calcul (v1.1) - dimanche 3 novembre 2024
- Dématérialisation de la facturation : nouvelles mentions obligatoires - lundi 28 octobre 2024
- Interpréteur de formules de calcul en Python - dimanche 13 octobre 2024
- Les données de la facturation électronique - mercredi 9 octobre 2024