Re-,
avec ce code, je détermine ta zone qui contient toutes les données (produit et poids) donc le deuxième tableau
Puis dans les cellules vides de la colonne B, insertion de la formule qui va bien, Calcul (si tu es en mode calcul manuel), et supprimes les formules par les valeurs.
Sub recherch()
Dim pl As Range
Set pl = Range("G1:H" & Range("G65536").End(xlUp).Row)
pl.Name = "base"
With Range("B1:B" & [A6500].End(xlUp).Row).SpecialCells(xlCellTypeBlanks)
.FormulaR1C1 = "=VLOOKUP(RC[-1],Base ,2,0)"
Calculate
.Value = .Value
End With
End Sub