OVH Cloud OVH Cloud

Comparaison de 2 plages en Excel(VBA)

1 réponse
Avatar
regis
J'ai une plage A1:B5 sur feuille 1, une autre plage A1:B5=20
sur feuille 2.
J'aimerais une proc=E9dure qui compare :
-> les valeurs en colonne A des 2 feuilles=20
-> si OK test la valeur de la Colonne B
avec message si diff=E9rence

Merci

1 réponse

Avatar
Jacky
Bonjour Regis

Ceci peut-être:
'-------------
Sub test()
For i = 1 To 5
If Sheets("feuil1").Range("a" & i) = Sheets("feuil2").Range("a" & i) Then
If Sheets("feuil1").Range("b" & i) <> Sheets("feuil2").Range("b" & i) Then
MsgBox "La cellule : " & Sheets("feuil1").Range("b" & i).Address & " de
la feuille 1" & Chr$(10) & "est différente de la cellule " &
Sheets("feuil2").Range("b" & i).Address & Chr$(10) & "de la feuille 2"
End If
End If
Next
End Sub
'-----------------
Salutations
JJ

"regis" a écrit dans le message de
news:213a201c45a81$10da27b0$
J'ai une plage A1:B5 sur feuille 1, une autre plage A1:B5
sur feuille 2.
J'aimerais une procédure qui compare :
-> les valeurs en colonne A des 2 feuilles
-> si OK test la valeur de la Colonne B
avec message si différence

Merci