Calculer une somme suivant les intitulés de colonne

[trigger00]

Bonjour à tous, je ne sais pas si le titre est trés claire c'est pourquoi je vous joint une petit image pour illustrer mon probleme :

http://imagik.fr/view-rl/82958

En bref, je voudrais créer un récapitulatif des commandes, je debute en Vba et je ne sais pas trop comment me lancer dans ce code...

J'ai deja fais un code (je cherche les intitulés):

NbColMax = Sheets(1).UsedRange.Columns.Count
 
ColSynt = Cells.Find(what:="toto").Column
 
LignSynt = Cells.Find(what:="cahier").Row
 
 
For j = 2 To NbColMax
 
 Intitul = Cells(LignSynt, j).Value 'balaye les intitulés
 Code = Left(Intitul, 4)            'recupere le code
 MsgBox Code                        'affiche le code
 
Next

Mais aprés ça je suis completement perdu, j'ai oublié de préciser que le tableau doit etre le plus interactif possible ( si par exemple des "cartable rouge/vert" arrivent, il doit y avoir une nouvelle colonne "cartables")

Cordialement,
Trigger

[fgiambelluco]

Bonjour
Pourquoi ne pas faire un Tableau Croisé dynamique ?


--------------
Frédéric
http://www.access-developpement.com

[trigger00]

Merci à toi de préter attention à mon probleme, mais je doit passer obligatoirement par macro car je vais ensuite insérer ce code à une autre macro deja existante...

[cafeine]

Hello,

avec somme.si()

=SOMME.SI($B$1:$E$1;J$1 & "*";$B2:$E2)

$B$1:$E$1 => la plage avec cahier bleu, cahier rouge ...
J$1 => le critère de colonne cahier ou classeur
$B2:$E2 => la plage des nombres à sommer

[trigger00]

Merci à toi cafeine mais ta méthode ne rend pas "interactif" mon tableau, si les "cahiers" ou les "classeurs" changent de colonne toute l'application tombe à l'eau ...

[cafeine]

Mais de rien,
en fait non, si les cahiers changent de colonne ce ne sera pas un problème, du moment qu'ils restent dans une plage définie ici par
$B$1:$E$1 mais rien n'empêche que se soit $B$1:$Z$1

Envoyé par trigger00

Merci à toi cafeine mais ta méthode ne rend pas "interactif" mon tableau, si les "cahiers" ou les "classeurs" changent de colonne toute l'application tombe à l'eau ...

[trigger00]

Je suis vraiment désolé cafeine mais deux solutions se posent devant moi :

1- Soit je ne comprend pas du tout "la somme sous conditon " ( ce qui est fort probable). Je n'arrive pas à visualiser comment elle peut etre interactive)

2- Soit on ne se comprend pas sur ce que je voudrais obtenir du code.

En te remerciant de ton aide,
Trigger

[Fvandermeulen]

Salut,
En effet, il y a de l'incompréhension dans l'air, les propositions de SommeSi devrait te convenir, donc je me suis permis de te faire un exemple sur le fichier joint pour que tu comprennes bien comment ça fonctionne.
Tu peux t'amuser à insérer une colonne (en D par exemple) et y noter en ton exemple de Cartable Vert/rouge, ensuite tu "tires" la formule de la colonne H vers la colonne I et tu change le nom de l'intitulé avec Cartable.
Si ce n'est pas ce que tu souhaite, il faudra est plus clair dans ta question.
A

[trigger00]

Je tiens à tous vous remercier, pour l'aide et le temps que vous avez fourni.

Fvandermeulen merci à toi tout particulièrement pour le code qui fonctionne exactement comme je souhaite.Cependant si tu pouvais détailler un peu ce dernier je t'en serais reconnaissant.

Cordialement,
Tigger00