Re,
Dans ton code d'origine (ci-dessous), il y a effectivement une boucle sur TabloT avec la variable i, mais il n'y a pas de boucle au niveau du tabloD où tu utilises le "And" pour les lignes 1 à 3.
Sub Vérif()
tabloD = Sheets("Données").Range("A1:A3")
tabloT = Sheets("Tableau").Range("A7:D" & Sheets("Tableau").Range("A" & Rows.Count).End(xlUp).Row)
For i = 1 To UBound(tabloT, 1)
If tabloT(i, 1) = 2 Then
If tabloT(i, 4) <> tabloD(1, 1) And tabloT(i, 4) <> tabloD(2, 1) _
And tabloT(i, 4) <> tabloD(3, 1) Then
MsgBox "Le contenu de la cellule A" & i + 6 & " est incorrect."
End If
End If
Next i
End Sub
J'ai essayé de modifier ton code et de faire une boucle sur tabloD avec une variable Z mais cela ne marche pas. (code de mon tableau précédent)