Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

supprimer doublon

  • Initiateur de la discussion Initiateur de la discussion fileofish
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

fileofish

XLDnaute Occasionnel
Bonjour à tous,

Je sais que le sujet à déjà été traité mais j'ai quand même un petit problème

Voilà

J'ai dans une feuille (numéro 2) une liste de noms (colonne B). Dans cette colonne, certains noms apparaissent plus d'une fois.

Je voudrais supprimer les doublons de manière à ce que si DUPONT apparaisse 3 fois il n'en reste plus qu'un.

A coté de cette colonne j'ai d'autres données => je ne veux donc pas supprimer la ligne lorsqu'il y a des doublons (car il pourrait me supprimer une ligne avec des données) mais uniquement qu'il supprime la cellule doublon en remontant les cellules vers le haut

J'ai récupéré ce code macro mais ca marche pas:


Private Sub CommandButton1_Click()
Feuil2.Select
Dim plage As Range
Dim i As Integer
Set plage = Range("b2:b" & Range("b65536").End(xlUp).Row)
For i = Range("b65536").End(xlUp).Row To 2 Step -1
If Application.CountIf(plage, Cells(i, 2)) > 1 Then
Rows(i).Delete
End If
Next i

End Sub


Autrement si il est possible d'avoir une liste sans doublons directement dans une combobox c'est mieux 🙂


Si quelqu'un a une autre solution je suis preneur

Je vous remercie par avance
Philippe
 
Dernière édition:
Re : supprimer doublon

Bonjour Béa , Bonjour Renauder

Merci à tous les 2.

Comme c'est pour alimenter un formulaire la solution de Béa me semble dans ce cas plus appropriée.
Merci encore
Philippe

Comme d'habitude Béa c'est du 100% 😉 qu'est ce que je ferais sans toi !! (pas grand chose c'est sur !!)

Dans ce cas là je pourrais même dire du 200% 🙂)
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
15
Affichages
779
Réponses
5
Affichages
909
Réponses
10
Affichages
661
Réponses
5
Affichages
573
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…