Sommeprod en VBA

[ivan27]

Bonjour à tous,

Après maintes tentatives et recherches infructueuses, je cherche à convertir une fonction Sommeprod en VBA.

Comment obtenir en G2 le nombre de "OUI" pour le mois de janvier ?

Merci d'avance pour votre aide.

Cordialement,

Ivan

 

[Iznogood1]

Re : Sommeprod en VBA

Une piste
ActiveCell.FormulaR1C1 = _
"=SUMPRODUCT(AND(MONTH(RC[-6]:R[22]C[-6])=1,YEAR(RC[-6]:R[22]C[-6])=2015)*(RC[-5]:R[22]C[-5]=""OUI""))"

 

[ivan27]

Re : Sommeprod en VBA

Bonsoir le forum, Iznogood1,

Merci pour ta proposition,
J'ai continué de mon côté à rechercher une solution sans FormulaR1C1
Le résultat n'est pas exactement celui attendu.

Cells(2, 7) = Evaluate("=SUMPRODUCT(Month(A2:A100=(F2))*(B2:B100=""OUI""))")

Ce code me retourne le nombre total de "OUI" mais le mois n'est pas pris en compte.
La solution est probablement toute proche...

Ivan

 

[JCGL]

Re : Sommeprod en VBA

Bonjour à tous,

Peux-tu essayer :

Cells(2, 7) = Evaluate("=SUMPRODUCT((MONTH(A2:A100)=MONTH(F2))*(B2:B100=""OUI""))")

A+ à tous

 

[néné06]

Re : Sommeprod en VBA

Bonjour le Forum,

Un petit exemple qui peut être utile ?

A+

René

 

[ivan27]

Re : Sommeprod en VBA

Re bonjour à tous,

Merci beaucoup JCGL.
J'avais fais des tentatives avec le second "MONTH" mais mes parenthèses étaient incorrectes.
René, je conserve précieusement ton "petit" exemple...
Je vous réitère mes remerciements,
Bonne fin de journée
Ivan