Bonjour,
une solution via une macro événementielle à mettre dans le code la feuille criticité MACE
Private Sub Worksheet_Calculate()
Set re = Worksheets("calcul criticité").Columns("d").Find(Range("c6"), LookIn:=xlValues, lookat:=xlWhole)
If re Is Nothing Then
Else
re.Offset(0, -2) = Range("B7")
End If
End Sub