dédoublonner 18000 lignes

[nicolas]

Bonjour à vous,

Je souhaiterais dédoublonner une liste de 18 000 lignes, la colonne en question est la colonne B. J'ai essayé les macros en téléchargement ici mais ça ne gère pas une si grande liste. Auriez-vous une solution avec une macro ? Je suis totalement débutant en la question.

Merci beaucoup d'avance

 

[Brigitte]

Bonjour nicolas,

Une piste qui vaut ce qu'elle vaut : on l'a testée l'autre jour sur 46000 entrées (au moins de mémoire) ; il s'agit du Filtrage avec extraction de doublons...

Bon courage.

Brigitte

 

[loki22]

salut nicolas
essaye cela je l'utilise regulierement

Sub Comparaison_click()
Dim Plage As Range, i&, Cell As Range, Rng As Range
On Error Resume Next
Set Plage = Application.InputBox("Plage à examiner", Type:=8)
If IsEmpty(Plage) Then Exit Sub
Application.ScreenUpdating = False
For Each Cell In Plage
For i = 1 To Plage.Count
Set Rng = Cell.Offset(i)
If Rng <> "" And Rng = Cell Then
Cell.Interior.ColorIndex = 43
Rng.Interior.ColorIndex = 43
Exit For
End If
Next i
Next Cell
End Sub

 

[nicolas]

Merci beaucoup déjà pour vos réponses plus que rapides,

Brigitte, j'avais entre-temps utilisé ta technique et effectivement ça a permis de nettoyer pas mal d'un coup.

Loki ta technique est bien pratique pour mettre en avant les doublons diffusés sur plusieurs colonnes, même si sur 18000 lignes il m'aurait plutôt fallu le code pour que ça supprime la ligne-doublon incriminée plutôt que la mettre en couleur avec le ColorIndex. Je suis nul en programmation je le répète héhé 🙂

 

[Sergio]

Bonjour, J'ai un petit problème lol !

Qd je colle cela ds Macro ds Excel et je compile, excel me trouve une erreur sur "Cell" et je n'arrive pas a la récrifier.
Est-ce ke kelkun pourrai m'aider ?

Par avance, merci bcp !

 

[Sergio]

G oublié de préciser que dans ma liste, les noms sont tous rangés par ordre alphabétique et donc je me demandais si la macro ne pouvais pas faire toute la liste d'un coup et de ne pas avoir a la demarrer a chake fois pour chake nom !

Merci

 

[myDearFriend]

Bonsoir tout le monde,

Nicolas, Sergio, peut-être pouvez-vous essayer avec la macro complémentaire que j'avais mise à disposition dans ce fil : Lien supprimé

Nicolas, je viens de tester avec 25000 lignes, ça semble tenir le coup !

1/ Tu lances la macro XLA.
2/ Tu ouvres ton fichier et active la feuille à analyser.
3/ Tu cliques sur le bouton "Doublons" dans la barre d'outils Excel.
4/ Tu sélectionnes dans la liste la "colonne B".
5/ Tu cliques sur "Supprimer Doublons" et.... tu patientes !

Une MsgBox te demande de confirmer la suppression des lignes Doublons, tu valides par OK.


Cordialement,
Didier_mDF

 

[nicolas]

merci mydearfriend pour ce bel outil (qui me sauve la vie, ou du moins la mise).