Bonjour,
J'ai un petit soucis au niveau de la comparaison de deux colonnes de données.
Je veux comparer deux colonnes sur deux feuilles de calcul differentes, mais mon code ne fonctionne pas entierement.
Voici ce que devrais faire mon code;
Il devrait prendre la premiere valeur de la 1er colonne et la comparé à toutes les valeurs de la 2eme colonne, et une fois la condition est vraie recopier la valeur de la cellule de la 2eme colonne dans une colonne prédefinie pour cela.
Je vous affiche mon code et dite moi ce qui va pas :
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub changement() Dim x As Long Dim y As Long For x = 58 To 2000 For y = 515 To 2000 If Right(Range("E" & x), 5) = Mid(Sheets("Plaf").Range("B" & y), 7, 5) Then ActiveSheet.Cells(x, "X") = Worksheets("Plaf").Cells(y, "B") End If Next y Next x End Sub
Partager