Discussion :

[Plc8919]

Bonjour,

J'ai un problème, j'ai besoin de comparer les valeurs contenues dans une colonne afin de voir si elles sont dans une deuxième colonne.

Si la valeur de la première colonne est dans la deuxième colonne alors on inscrit "OK" dans la troisième colonne, autrement on inscrit "aucune référence".

Voir photo en PJ.

Ma macro que j'ai tenté de réaliser ne marche pas.

Ma macro:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub comparaison_colonnes2()
Dim i As Long, e As Long
 
   Worksheets("Feuil1").Activate
 
    For i = 2 To Range("A2").End(xlDown).Row
        For e = 2 To Range("B2").End(xlDown).Row
            If Cells(i, 1).Value = Cells(e, 2).Value Then
            Cells(e, 2).Offset(0, 1).Value = "OK"
            Else
            Cells(e, 2).Offset(0, 1).Value = "aucune référence"
            End If
        Next e
    Next i
End Sub

Si quelqu'un peut m'aider svp.