Discussion :

[Pacoloco]

Bonjour, à tous sur le forum

je travail sur excel 2010 ou 2016 en fonction des postes de travail

J'ai un tableau qui se présente ainsi sur 200 lignes

	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q	R	S	T
1	DUPONT		V8				V8				V8,5		8,0	7,0			8,0	0,0
2	Pierre
3	DUPOND		3,0	0,0	3,0	3,0			6,0	4,0	4,0	4,0	3,0	4,0	3,0	0,0			6,0	0,0
4	Paul
5	MARTIN		7,0	7,0	5,0	5,0	8,0	8,0	V10,5		V3		V7,5		V5		V8		3,0	3,0
6	Jack

Je souhaiterais faire la somme de la partie numérique et par ligne des cellules lorsqu’elles contiennent la lettre « V »et l’inscrire en colonne U

Par exemple: sur la ligne 1 pour DUPONT mettre en U1 une formule qui calcule 8+8+8,5=24,5
sur la ligne 3 pour DUPOND mettre en U3 une formule qui calcule = 0
sur la ligne 5 pour MARTIN mettre en U5 une formule qui calcule 10,5+3+7.5+5+8=34

je bloque en vain avec SOMMEPROD(($A$1:$A$6=$a1)*(ESTNUM(CHERCHE("V";$C$1:$T$6)))*1;(SUBSTITUE($C$1:$T$6;"V";"")*1))
J’en appel à votre aimable soutien si quelqu’un avait la solution
merci

[QuestVba]

Bonsoir,

J'ai fait un truc rapide que tu devras adapter (cette formule permet de calculer les nombre après le v si présent dans la plage A1:A6):

Code :

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

=SOMMEPROD((GAUCHE(A1:A6)="v")*(CNUM(DROITE(A1:A6;NBCAR(SUBSTITUE(A1:A6;"v";""))))))

À valider avec CTRL MAJ ENTER


Allez:

Code :

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

=SOMMEPROD((GAUCHE(B1:T1)="v")*(CNUM(DROITE(B1:T1;NBCAR(SUBSTITUE(B1:T1;"v";""))))))

[Pacoloco]

Code :

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

=SOMMEPROD((GAUCHE(B1:T1)="v")*(CNUM(DROITE(B1:T1;NBCAR(SUBSTITUE(B1:T1;"v";""))))))

[/QUOTE]

Merci pour ta réponse QuestVba
j'ai bien validé la formule matricielle
mais j'ai en retour "#VALEUR! "
la formule fonctionne bien lorsque je l'utilise sur une somme en colonne mais ça renvoi une valeur d'erreur pour une somme en ligne.
Je comprends pas pourquoi !!!

[mdo100]

Bonjour Pacoloco, QuestVba,

Une proposition:

J'ai intégré la possibilité d'avoir des V en minuscule ou majuscule (risque de saisie oblige).

En "U1"

Code :

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

=SOMME(SI(ESTVIDE(B1:T1);0;SUBSTITUE(SUBSTITUE(B1:T1;"V";"");"v";"")*1))-SOMME(B1:T1)

Formule matricielle a valider avec ctrl + maj + entrée

Cordialement.

[Pacoloco]

Un Grand MERCI QuestVba,

Cela fonctionne parfaitement
Serait il envisageable d'avoir une explication sur la décomposition de la formule.
Car je ne comprends pas les différentes contraintes pour lesquelles la mienne ne fonctionnait pas
Par avance encore merci

Cordialement.[/QUOTE]

[mdo100]

Un Grand MERCI QuestVba,

Cela fonctionne parfaitement
Serait il envisageable d'avoir une explication sur la décomposition de la formule.
Car je ne comprends pas les différentes contraintes pour lesquelles la mienne ne fonctionnait pas
Par avance encore merci

Cordialement.

Re Pacoloco,
Bonjour QuestVba,

Moi aussi j'attends d'avoir les explications de ma formule par QuestVba,

Cdlt.