Discussion :

[ADbtr]

Bonjour,

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

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

J'ai essayé dans VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

=> Ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

=> Ne fonctionne pas

Merci d'avance de vos réponses

AD

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[ADbtr]

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

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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