EXCEL - comparer deux listes... Fermé

Question

Salut à tous!

j'ai une petite question :

j'ai deux listes de références produit sous excel très longue.

Comment les comparer rapidement?

Le but serait de repérer dans ma premiere liste les références qui figurent la deuxieme (liste de references qui doivent être retirées.

J'espere que c'est clair...

En tous cas merci à vous!!

Ophélie

tropikboy · Answer

salut,
tes références sont en format caractère ou numérique ?

Steefif · Answer

Selon moi le plus rapide est un find
j'ai eu le meme probleme 2 liste de 20000 entrees environ et ca va relativement vite.
en totu cas c'ets le plus rapide que j'ai trouvé

Steefif · Answer

Je te dis tu fasi une macro
j'avais 20000 valeur la comparaison se fait en gros en 1-2 minutes
avec 250 ca va prendre 20 secondes meme pas

Steefif · Answer

ok, désolé, j'avais pas compris ta réponse alors!
voila ma macro:

il faut toucher deux-trois trucs (voir italiques)

For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row   i = 2 car j'ai une ligne d'entete
    Sheets("Feuil1").Activate     les données que je veux trouver sont sur la feuille 1
    Cells(i, 1).Select
        Set check_data = Sheets("Feuil2").Columns(2).Find(What:=Cells(i, 1), LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious, MatchCase:=False)
les données de ma liste de référence sont sur la feuil2, dans la colonne2. De plus je parcours a partir du bas de ma liste afin d'avoir la version al plus récente. enfin, je prend en compte la totalité du contenu de la cellule et pas une partie seulement
        If Not check_data Is Nothing Then
            .....      si al référence est trouvée alors.....
        Else
            .....      sinon .....         
        End If
Next i


si tu as encore besoin de précision n'hésite pas

Steefif · Answer

non il faut la creer comem une macro
pour ce faire
outil/macro/nouvelel macro
tu demarres l'enregistrement puis tu l'arretes
outil/macro/macro 1 tu clique sur modifier
tu colles le résultats entre les deux bannieres [sub] et [end sub]
et voila le travail
apres je te dis, il faut la retoucher un peu
si tu veux, envoie moi le fichier en question sur 
http://www.cijoint.fr/

n'oublie d'envoyer le lien dans la réponse

Steefif · Answer

si elle trouve c'ets donc apres le if....then
tu met

cells(i,1).interior.colorindex = 24 (je connais pas le code couleur du rouge dsl)

tropikboy · Answer

code couleur du rouge = 3

Steefif · Answer

je savais pas qu'on pouvais mette .color = vbred!
meric pour l'info
et merci pour l'info du code couleur!