Suppression des doublons dans une liste

gdcobra91

XLDnaute Junior
Bonjour,

Je souhaiterai connaitre la méthode (formule) pour supprimer les doublons dans une colonne. Puis, supprimer les lignes vides.

Merci par avance.
 

Oranger

XLDnaute Occasionnel
Re : Suppression des doublons dans une liste

Voilà une procédure de suppression des doublons:

on utilise la procédure comme ceci:
Call Enlever_doublons("Feuil1", "A1", False)

A1 désigne la première cellule de ta plage
si tu as un titre tu marque true sinon tu marque False

Sub Enlever_doublons(feuille As String, myRange As String, titre As Boolean)

If titre = False Then
Worksheets(feuille).Range(myRange).Sort _
key1:=Worksheets(feuille).Range(Left(myRange, 2) & "2"), _
Order1:=xlAscending, header:=xlGuess
Else
Worksheets(feuille).Range(myRange).Sort _
key1:=Worksheets(feuille).Range(Left(myRange, 2) & "2"), _
Order1:=xlAscending, header:=xlYes
End If

Set MaCell = Worksheets(feuille).Range(myRange)

Do While Not IsEmpty(MaCell)
Set MaCellSuite = MaCell.Offset(1, 0)
If MaCellSuite.Value = MaCell.Value Then
MaCell.EntireRow.Delete
End If
Set MaCell = MaCellSuite

Loop
End Sub
 

david84

XLDnaute Barbatruc
Re : Suppression des doublons dans une liste

Bonsoir,
Salut Tototiti et merci pour le compliment:).
Cependant, je conseillerais plutôt à notre ami de consulter ce tuto dans lequel j'arrivais aux mêmes résultats en me passant de la fonction Fréquence (plus simple d'utilisation).
Je lui conseillerais également de rechercher les messages de Monique qui a également bien travaillé le sujet.
A+
 

bcharef

XLDnaute Accro
Re : Suppression des doublons dans une liste

Bonsoir gdcobra91, tototiti2008, Oranger, david84 & Jean-Marcel,
Bonsoir à toutes et à tous.

Pour gdcobra91

Afin de faire suite à la recommandation évoquée par notre ami david84, j'ai le plaisir de te communiquer le lien de notre reine Monique.

https://www.excel-downloads.com/threads/liste-deroulante-sans-vide.93291/

Bonne lecture et de courage.

Amicalement.

BCharef
 

Discussions similaires

Réponses
4
Affichages
1 K

Statistiques des forums

Discussions
312 390
Messages
2 087 938
Membres
103 679
dernier inscrit
yprivey3