Rebonjour,
J'ai au final réussi ce que je voulais faire :
Function RELATIONTEST2(Destination As Range)
Application.Volatile
Dim Plage2 As Range, Plage3 As Range, Col1, Col2, Col3, Col4, Resultat1, Resultat2, Resultat3, Resultat4
Set Plage2 = Sheets("Feuil2").Range("A5:D7")
Set Plage3 =...