Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

A partir d'un tableau sommer des lignes puis renvoyer la valeur en VBA

  • Initiateur de la discussion Initiateur de la discussion awa123
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

awa123

XLDnaute Occasionnel
Bonjour,

Je cherche le code VBA qui me permettrai à partir d'un tableau (extensible car mis à jour des infos. regulierement)
sommer les différents noms d'opérations qui sont effectuées en 2012 et en 2013.
puis renvoyer la valeur de la somme associé au nom correspondant dans le fichier resultat .

voir pièce jointe pour l'illustration svp

Merci beaucoup
 

Pièces jointes

Re : A partir d'un tableau sommer des lignes puis renvoyer la valeur en VBA

Bonjour awa123,

C'est un problème classique qui se traite très facilement par formule.

1) Dans le fichier data.xslx nommez le tableau Base par la formule dynamique :

Code:
=DECALER(Feuil1!$A$1:$B$1;;;NBVAL(Feuil1!$A:$A))
2) Dans le fichier resultat.xslx entrez en B2 la formule :

Code:
=SOMMEPROD((INDEX(data.xlsx!Base;;1)=A2)*((INDEX(data.xlsx!Base;;2)=2012)+(INDEX(data.xlsx!Base;;2)=2013)))
à tirer vers le bas.

Nota : 2012 et 2013 peuvent être remplacés par les références de 2 cellules...

A+
 
Re : A partir d'un tableau sommer des lignes puis renvoyer la valeur en VBA

Re,

J'oubliais la formule en A2 du fichier resultat.xslx :

Code:
=INDEX(INDEX(data.xlsx!Base;;1);MIN(SI(NB.SI(A$1:A1;INDEX(data.xlsx!Base;;1))=0;LIGNE(INDEX(data.xlsx!Base;;1)))))
C'est une formule matricielle à valider par Ctrl+Maj+Entrée.

La tirer vers le bas jusqu'à ce qu'elle affiche "Opération".

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

E
Réponses
3
Affichages
999
E
K
Réponses
1
Affichages
1 K
K
P
Réponses
5
Affichages
1 K
Pierre_0901
P
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…