Salut Julien,
Salut l'équipe,
Premier jet, en gérant cela avec VBA...
Ici, le contrôle se fait sur la plage [C1:F10
If Not Intersect(Target, Range("B2:B" & Range("B" & Rows.Count).End(xlUp).Row)) Is Nothing Then
If InStr([B1], "/") > 0 Then
tTab = Range("C1:F10").Value
vItem = Split([B1], "/")(1)
vRep = Target.Value
[B1] = "Liste"
For x = 1 To UBound(tTab, 1)
For y = 1 To UBound(tTab, 2)
If tTab(x, y) Like vItem Then tTab(x, y) = vRep
Next
Next
Range("C1:F10").Value = tTab
End If
End If
A+