Comment rechercher des doublons

[DST]

Bonjour,
je cherche une solution rapide et efficace pour trouver dans une colonne B les doublons.
Merci d'avance pour votre aide
DST

 

[Monique]

Re : Comment rechercher des doublons

Bonjour,

Une autre
Formule matricielle, à valider par ctrl, maj et entrée

 

[DoubleZero]

Re : Comment rechercher des doublons

Re-bonjour,

Moins rapide que la solution de pierrejean 😱, une nouvelle proposition par macro dans le fichier joint.

... Pour le tableau croisé de DoubleZéro, je n'en ai jamais fait donc comment faire?...

Pour ce qui concerne le tableau croisé dynamique, je ne me hasarderai pas à fournir un mode d'emploi. Une recherche permettra de trouver des Ce lien n'existe plus sérieuses.

Bon courage 🙂 et à bientôt.

 

[DST]

Re : Comment rechercher des doublons

Bonjour,
Un grand merci à tous pour ces informations et ces solutions.
Bonne journée
DST

 

[pierrejean]

Re : Comment rechercher des doublons

Re

Une version commentée de la macro de recherche des doublons

 

[DoubleZero]

Re : Comment rechercher des doublons

Bonjour, le Fil, le Forum,

... Une version commentée de la macro de recherche des doublons

Grand MERCI, pierrejean 🙂, pour ces explications qui vont être rangées dans mon coffre à trésors !

 

[DST]

Re : Comment rechercher des doublons

Bonjour, je dois être idiot ou fatigué mais je n'arrive pas ouvrir le fichier de pierrejean pour voir sa version commenté
DST

 

[pierrejean]

Re : Comment rechercher des doublons

Re

Peut etre parce qu'il s'agit d'un fichier comprimé
Voici la version .xls

 

[DST]

Re : Comment rechercher des doublons

Bonjour,
Je me permets de revenir sur le sujet en cours car est'il possible aussi de faire apparaitre tous les produits (aussi bien en unité qu'en double) avec le nombre.
merci d'avance
DST

 

[pierrejean]

Re : Comment rechercher des doublons

Re

En supposant avoir bien compris !!

 

[DST]

Re : Comment rechercher des doublons

Merci pour votre reponse.
Est'il possible que les nom et les nombre (colone I et J) soit dans une feuille a part?
Merci d'avance
DST

 

[Monique]

Re : Comment rechercher des doublons

Bonjour à tous,

Le fichier du 19/07/11 18:01 complété,
ordre alphabétique ou les plus nombreux avant, avec ou sans cellules vides

Formules matricielles, à valider par ctrl, maj et entrée

 

[DST]

Re : Comment rechercher des doublons

Merci Monique,
mais avec cette formule le fichier est trop lourd et met un temps infini (plusieurs dizaine de minutes) à enregistrer.
Est'il possible d'adapter la solution de Jean-Pierre en transférant les données sur un autre onglet et de les classer par ordre alphabétique (nom et chiffre -> de plus grands au plus petits).
Merci d'avance de toute votre aide.
DST

 

[BOISGONTIER]

Re : Comment rechercher des doublons

Bonsoir,

0,2 sec pour 10.000 lignes

Sub CompteItems()
  Set d = CreateObject("Scripting.Dictionary")
  Set champ = Range("B6", [B65000].End(xlUp))
  For Each c In champ
    d(Trim(c.Value)) = d(Trim(c.Value)) + 1
  Next c
  Set f = Sheets(2)
  f.[A2].Resize(d.Count, 1) = Application.Transpose(d.keys)
  f.[B2].Resize(d.Count, 1) = Application.Transpose(d.items)
  f.[A2].CurrentRegion.Sort Key1:=f.[B2], Order1:=xlDescending, Key2:=f.[A2], Order2:=xlAscending, Header:=xlGuess
End Sub

JB

 

[DST]

Re : Comment rechercher des doublons

Bonsoir,
Merci pour ton aide, je le met en application dans mon fichier professionnel et je te redonne des nouvelles rapidement.
DST