Bonjour voici mon problème:

Mon code ne marche pas au niveau du range:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Sub PoidsNavire()
Dim Poids, Navire As Double
Dim j As Long
j = 5
 
For i = 5 To 150
        Range("AH" & i).FormulaLocal = Evaluate("=SOMMEPROD( ($H$33:$H$15051 = Range(""AG"" & j).Value )*($F$33:$F$15051=""adr"")*($E$33:$E$15051=""mp"")*($L$33:$L$15051) )")
        j = j + 1
    Next
End Sub
Dans Excel ma formule marche bien:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
'=SOMMEPROD(($H$33:$H$15051 = AG5)*($F$33:$F$15051="adr")*($E$33:$E$15051="mp")*($L$33:$L$15051))
Mais dans VBA au niveau de:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range(""AG"" & j).Value
Erreur: #NOM? sans .Value avec j'ai un #VALEUR
ça crash, c'est un problème de conception, je n'arrive pas à mettre la main sur le problème, comment en VBA récupérer le range...