Chris,
Ta macro marche dans le tableau que je vous est mis à dispo mais quand je la met dans mon classeur à moi je n'arrive pas à la faire marcher.
La différence entre mon tableau et celui que tu as vu c'est que la colonne A est en colonne O est aussi que je ne commence pas à la ligne 1 mais 2.
en ligne 1 j'ai les noms des colonnes. J'ai modifier ton code voir ci-dessous pour l'adapter à mon tableau mais ça ne marche pas donc j'ai mal fait la modif.
J'ai changer tout les A par des O
Sub Surbrillance()
Dim MaFeuille As Worksheet
Dim I As Long, J As Long
Dim TabO, TabB
Set MaFeuille = Worksheets("Feuil1")
TabO = Range(Cells(1, 1), Cells(MaFeuille.Cells(Rows.Count, 1).End(xlUp).Row, 1))
TabB = Range(Cells(1, 2), Cells(MaFeuille.Cells(Rows.Count, 2).End(xlUp).Row, 2))
For J = 2 To UBound(TabB)
For I = 2 To UBound(TabO)
If TabB(J, 1) = TabO(I, 1) Then
MaFeuille.Cells(J, "B").Interior.Color = vbYellow
End If
Next
Next
Set MaFeuille = Nothing
End Sub