Récupérer les valeurs de i pour lesquelles liste(i)=valeur

[bill4807]

Bonjour,

Je déclare deux colonnes de valeurs :

Dim liste1(500), liste2(500)

Je voudrais dans un premier temps récupérer les valeurs de i pour lesquelles liste1(i)=2012 puis 2013, 2014, etc...

Puis dans un deuxième temps, si par exemple liste(i)=2012 pour i=2,7,8 faire la somme de liste2(2)+liste2(7)+liste2(8)

Je suis littéralement bloqué, j'espère avoir été assez explicite.

Bien cordialement

 

[R@chid]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Bonjour et Bienvenu sur XLD,
Tu peux nous fournir un fichier exemple avec les résultats souhaités calculés manuellement...
Aller en mode avancé ==> Gérer les pièces jointes
Amicalement

 

[bill4807]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Voilà en pièce jointe un fichier exemple. Les valeurs que je souhaite calculer avec ma macro sont en rouge.

Merci beaucoup pour votre aide.

 

[R@chid]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Bonjour,
je ne sais pas faire avec du VBA, mais avec une formule c'est simple,
en D2,

=SOMME.SI($A:$A;D1;$B:$B)

@ tirer vers la droite
@ micalement

 

[CHALET53]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Bonjour,

Une autre façon tirée d'exemples récupérés sur ce forum

a+

 

[bill4807]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Merci beaucoup pour votre aide, je vais me servir de cela pour l'instant.

 

[Efgé]

Re : Récupérer les valeurs de i pour lesquelles liste(i)=valeur

Bonjour bill4807, CHALET53, Bonjour R@chid Une version VBA commentée. Cordialement