Discussion :

[Kiouane]

Bonjour à tous,

Je suis entrain de faire des calculs sur un fichier avec un SommeProd sur VBA mais je souhaiterais que cette dernière aille chercher une liste de critères qui seront renseignés par un utilisateur et à l'aide d'une boucle refaire le SommeProd pour chaque critère.

Exemple : Liste de critères : 1574* - 5874* - 9847*


avec une boucle refaire le sommeprod suivant pour les 3 critères :

Code :

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

1
2
3
SUMPRODUCT(('OTD Analyse'!C20=R[-2]C)*(LEFT('OTD Analyse'!C26,5)=""1574*""))
SUMPRODUCT(('OTD Analyse'!C20=R[-2]C)*(LEFT('OTD Analyse'!C26,5)=""5874*""))
SUMPRODUCT(('OTD Analyse'!C20=R[-2]C)*(LEFT('OTD Analyse'!C26,5)=""9847*""))

Merci beaucoup pour votre aide.

[joe.levrai]

Bonjour,

mets ta liste de critères dans un tableau interne VBA (par exemple MonTableau)

et boucle sur chaque indice (admettons i) de ton tableau, en utilisant dans ta boucle la formule :

Code :

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

"=SUMPRODUCT(('OTD Analyse'!C20=R[-2]C)*(LEFT('OTD Analyse'!C26,5)=""" & MonTableau(i) & """))"

[Kiouane]

Merci beaucoup pour ta réponse, est-il possible de prendre la même formule et de l'utiliser dans une variable pour que je puisse additionner les 3 SumProduct. Je m'explique, en fait le sumproduct il est calculé dans une cellule puis avec la boucle le prochain critère écrase les données de l'ancien et comme je peux pas faire de référence circulaire en formule je me demandais s'il serait possible d'écrire la même fonction dans une variable tel que : mavariable = mavariable + sumprod(i)

[joe.levrai]

Puisque tu poses la question, apporte la réponse, ainsi que le schéma méthodologique ... je vais me contenter d'un lapidaire :

oui, tu n'as plus qu'à faire