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.

[QuestVba]

Bonsoir,
Quelle attente, oups que vais-je faire ?

Bon 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";""))))))

Ma première partie

Code :

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

GAUCHE(B1:T1)="v"

permet de trouver les cellules qui commencent par "v" > GAUCHE

La seconde partie

Code :

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

CNUM(DROITE(B1:T1;NBCAR(SUBSTITUE(B1:T1;"v";""))))

permet
de transformer un chiffre donné sous forme de texte en nombre > CNUM
de remplacer un argument "v" par ce que je veux, c'est à dire rien > SUBSTITUE
de trouver le nombre de caractère restant lorsque que j'ai effectué la substitution > NBCAR
de prendre la partie droite en fonction du nombre de caractères > DROITE

DONC si ma cellule vaut 'v454'
SUBSTITUE : '454'
NBCAR : 3
DROITE : '454' (caractère)
CNUM : '454' (nombre)

[Pacoloco]

Désolé pour la réponse tardive
Je te remercie pour ta formule qui fonctionne parfaitement
juste un petit souci quand sur la ligne il y a une cellule avec une autre lettre que "V"
j'ai en retour "#VALEUR! "
STP saurais tu pourquoi
je serais preneur aussi pour un petit cours sur l'explication de ta formule
Avec tous mes respects
Bien Cordialement

[QuestVba]

Bonjour,
Dans ton exemple de départ, tu n'as pas dit qu'il y avait d'autres lettres.
Donc, ça foire.

Essaie avec ceci :

Code :

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

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

Attention : CTRL MAJ ENTER

La partie

Code :

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

SI(GAUCHE(B1:T1)<>"v"

te permettra de tester si la première lettre est différente de 'v'. Si c'est le cas, on ne fait rien, sinon on retombe sur la formule proposée.

[Pacoloco]

Bonjour QuestVba

Dans mes réponses j'ai confondu ta réponse et celle de mdo100
et je m'en excuse

Ta formule SOMMEPROD((GAUCHE(B1:T1)="v")*(CNUM(DROITE(B1:T1;NBCAR(SUBSTITUE(B1:T1;"v";""))))))
renvoie "#VALEUR! " même si j’enlève les cellules avec une autre lettre que "V"

c'est la formule de mdo100 qui fonctionne

Toutefois juste un petit souci quand sur la ligne il y a une cellule avec une autre lettre que "V"
j'ai en retour "#VALEUR! "
STP saurais tu pourquoi
je serais preneur aussi pour un petit cours sur l'explication de la formule de mdo100

Bien Cordialement

[QuestVba]

Re-,

Ceci:

Code :

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

=SOMMEPROD((GAUCHE(B4:T4)="v")*(SI(GAUCHE(B4:T4)<>"v";0;CNUM(DROITE(B4:T4;NBCAR(SUBSTITUE(SUBSTITUE(B4:T4;"V";"");"v";"")))))))

[Pacoloco]

Bonjour à tous,

Tous mes respects pour ta formule QuestVba
elle est tout simplement magique
je bute dessus depuis plus de trois semaines
et je n'ai toujours pas saisie ta syntaxe
merci une fois de plus à toi et à tous ceux qui se donnent
la peine de nous sortir des ténèbres

[QuestVba]

Que ne comprends-tu pas à la syntaxe ?

[Pacoloco]

Code :

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

=SOMMEPROD((GAUCHE(B4:T4)="v")*(SI(GAUCHE(B4:T4)<>"v";0;CNUM(DROITE(B4:T4;NBCAR(SUBSTITUE(SUBSTITUE(B4:T4;"V";"");"v";"")))))))

Code :

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

SUBSTITUE (SUBSTITUE(B4:T4;"V";"");"v";"")

Permet de remplacer dans la plage de cellules un argument "v" ou "V" par ce que je veux, c'est à dire rien

NBCAR
Permet de trouver le nombre de caractère restant lorsque que j'ai effectué la substitution

DROITE
Permet de prendre la partie droite des cellules de la plage en fonction du nombre de caractères

CNUM
permet de transformer un chiffre donné sous forme de texte en nombre

Code :

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

SI(GAUCHE(B4:T4)<>"v";0;

Permet de ne comptabiliser que les cellules de la plage commençant par "v" ou "V" (pas sensible à la casse) sinon elles sont égales à zéro

Je ne comprends pas comment s’imbrique cette partie dans l’action de la formule

Code :

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

SOMMEPROD((GAUCHE(B4:T4)="v")*

Merci encore

[QuestVba]

Bonsoir,

La fonction SOMMEPROD() permet d'obtenir un résultat en fonction de plusieurs conditions:

Code :

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

SOMMEPROD((champ1=condition1)*(champ2=conditions2)*(.....))

Cette fonction effectue des opérations sur des matrices.

• Les champs doivent avoir la même taille
• Les conditions doivent être placées entre ()
• Ne pas utiliser Et()/Ou(): Utiliser * et +
• Utiliser *1 pour convertir les Vrai/Faux en 1/0 ou --

[Pacoloco]

Merci encore je n'avais pas perçu touts ces conditions
c'est plus clair pour moi maintenant