Sommeprod et variable

Bonjour le forum,

Dim dern As Long
Dim l As Integer
dern = Range("D" & Rows.Count).End(xlUp).Row
l = Left(TextBox11.Value, 2)
With Range("d6:d" & dern)
  If .Find(l, LookIn:=xlValues) Is Nothing Then
      MsgBox "erreur"
      Exit Sub
  End If
Range("N7:N" & dern).NumberFormat = "0.00"
Range("M7").FormulaLocal = "=SOMMEPROD((GAUCHE(D6:D" & dern & ";2)=" & l & ")*H6:H" & dern & ")"
Range("N7").FormulaLocal = "=SOMMEPROD((GAUCHE(D6:D" & dern & ";2)=" & l & ")*J6:J" & dern & ")"
Range("M7").Value = (Range("M7").Value + Range("N7").Value)
Range("N7").Clear

End With

lorsque je mets mon nombre "=SOMMEPROD((GAUCHE(D6:D" & dern & ";2)=""60"")..
pas de problème mais je voudrais remplacer 60 par une variable comme ci-dessus et j'obtiens 0.00
ma variable "l" correspond bien à mon nombre 60
pouvez vous m'aider s'il vous plait
merci