Roblochon,
Je n'en ai pas... j;ai teste sans enregistrer.
Car If InStr(Product, "AA") > 0 Then Cells(2, 1) = "A-A" fonctionnait pour mon besoin 1
If InStr(Product, "AA") > 0 Then Cells(2, 1) = "A-A"
If InStr(Product, "BB > 0 Then Cells(2, 1) = "B-B"
par contre je n'arrivais pas a rajouter...