Bonjour,
j'ai deux feuilles excel que je veux traiter afin d'en avoir une seul...
je m'explique voila un exemple

Feuille 2

id valeur1 valeur2
1 5466 5464
2 546 456
3 5464 5464
4 87 456
5 45678 87654


Feuille 1

id valeur etat valeur1 valeur2

22 bleu bon
30 rouge tres bon
1 vert bon
45 violet moyen
2 gris pas bon
3 vert excellent
4 jaune
5 noir

je veux recuperer les deux valeurs valeur1 et valeur2 pour les rentrer dans la feuille 1 suivant les ID.

dc en reflechissant un peu j'ai pondu cela

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim toto As Variant
Dim i As longer
Dim p As longer
 
For i = 2 To 350000
toto = Feuil1.Cells(i, 1)
    For p = 2 To 35000
        If toto = Feuil2.Cells(p, 1) Then
            Feuil1.Cells(i, 5) = Feuil2.Cells(p, 2)
            Feuil1.Cells(i, 6) = Feuil2.Cells(p, 3)     
        End If
    Next p
Next i
cela marche tres bien mais le probleme c'est que cala prend enormement de temps car j'ai 350000 enregistrements.

es ce qu'il ya aurai une methode plus rapide... car 35 min c long

merci d'avance