Imbriquer des fonctions dans VBA

Bonjour,

je souhaite imbriquer des fonctions dans VBA, or ma méthode ne fonctionne pas.

La formule dans Excel fonctionne et donne :
{=(max(if(D2:D10000=Variable1;G2:G10000)}
(et ceci en formula matricielle)

J'ai essayé dans VBA :

Code:

---

Variable2=[Application.WorksheetFunction.Max(If(Range("D2:D10000")= Variable1,range("G2:G10000"))]

---

=> Ne fonctionne pas

Code:

---

Variable2=Evaluate("(Application.WorksheetFunction.Max(If(Range("D2:D10000")= Variable1,range("G2:G10000")))")

---

=> Ne fonctionne pas

Merci d'avance de vos réponses

AD

Code:

---

Evaluate("(MAX(IF(D2: D10000=" & Variable1& ",G2:G10000)))")

---

Merci pour cette réponse rapide.

Cependant, VBA me renvoi l'erreur "incompatibilité de type". Variable1 est un "String" (texte dans mon cas).

Merci pour la réponse

AD

Code:

---

Evaluate("(MAX(IF(D2: D10000=""" & Variable1 & """,G2:G10000)))")

---