Salut Sly,
Salut l'équipe,
il m'a semblé comprendre que, au-delà de l'origine de ta solution (VBA ou formule), tu cherchais surtout à te faciliter le travail à chaque fois que tu devais faire ce calcul.
Peut-être suis-je à côté de la plaque mais avec cette solution VBA, il te suffit de coller la macro dans n'importe quelle feuille (1 ou 2), de double-cliquer sur n'importe quelle cellule (vide de préférence ) pour y voir apparaître ton résultat.
La macro recherche seule l'emplacement de tes colonnes "Weight", prend les valeurs en tableaux et mouline ton résultat.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'
Dim tSh1, tSh2, Overlap As Double
'
Cancel = True
tSh1 = Sheets(1).Cells.Find(what:="Weight*", lookat:=xlWhole).Offset(1, 0).Resize(Sheets(1).UsedRange.Rows.Count, 2).Value
tSh2 = Sheets(2).Cells.Find(what:="Weight*", lookat:=xlWhole).Offset(1, 0).Resize(Sheets(2).UsedRange.Rows.Count, 2).Value
'
For x = 1 To UBound(tSh1, 1)
For y = 1 To UBound(tSh2, 1)
If tSh1(x, 2) = tSh2(y, 2) And tSh1(x, 1) <> "" Then _
Overlap = Overlap + IIf(CDbl(tSh1(x, 1)) <= CDbl(tSh2(y, 1)), CDbl(tSh1(x, 1)), CDbl(tSh2(y, 1))): Exit For
Next
Next
Target = Overlap
'
End Sub
A+