OVH Cloud OVH Cloud

Annuler Somme selon le texte

19 réponses
Avatar
Alba
Bonjour,

Je ne sais pas tr=E8s bien comment m'y prendre, je voudrais simplement
dans mon petit tableau ci joint annuler la formule total en colonne F
selon le texte qui est dans la colonne D.

Il doit y avoir diff=E9rentes solutions...et je n'en trouve pas une
seule !


http://cjoint.com/confirm.php?cjoint=3DbriMqyAwXu

Bonne journ=E9e

9 réponses

1 2
Avatar
JLuc
Alba avait soumis l'idée :
Oui JLuc, la formule est ok, mais sa ne me résoud pas mon problèem
dans le sens ou :


Sur la ligne 5
1) J'ai "bibi" alors le total est : la quantité par le tarif (super !)

2) Je veux changer "bibi" et je mets "coptère" : je n'ai plus rien
dans le total (toujours super) et je saisis au clavier un nombre x...ce
qui efface ma formule.... bien entendu.

3) Je me suis trompée et je veux remettre "bibi" : donc je n'ai plus
ma formule quantité par tarif (pas super du tout !.))

On 17 jan, 09:58, JLuc wrote:
Alba avait soumis l'idée :

Oup's ! Faudrait juste que je puisse rajouter un Et ou en OU (?)
c'est a dire que si je mets "copter" alors je n'ai rien dans la
cellule total (parfait) mais si je reviens sur "Héli" par exemple
alors j'ai de nouveau ma formule -qté * tarif-
oui je sais..... après je vais faire du tricot c'est juré !!Dans ce cas :
=SI(OU(D5="copter";D5="Héli");"";SOMME(C5*E5))


--
JLuc



Là, il faut t'arranger pour mettre ton nombre x dans une autre colonne,
ou jouer en macro dans le Worksheet_Change(...)
A la limite, donne nous la plage des données (nombre de ligne et à
partir de quelle ligne) et nous pourront te pondre quelque chose ;-)
Du genre :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D1:D20")) Is Nothing Then
If Target.Value <> "coptère" Or Target.Value <> "Héli" Then
Target.Offset(0,2).Formulalocal = "=SI(OU(D" & Target.Row & _
"=""copter"";D" & Target.Row & "=""Héli"");""""; _
SOMME(C"& Target.Row & "*E"& Target.Row & "))"
End If
End Sub

Pas tester, mais dis nous :-)

--
JLuc



Avatar
Alba
Wouha ! oui je pensais bien devoir passer en macro, je vais péparer le
fichier avec les colonnes et lignes réelles, avec les informations
nécessaires.

Dans un petit moment parce j'ai un petit garçon qui va avoir faim dans
peu de temps et sont estomac ne connait pas la touche pause, merci de
ton attention JLuc, je reviens te donner les infos un tout petit peu
plus tard.

Je viens de tester

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D1:D20")) Is Nothing Then
If Target.Value <> "coptère" Or Target.Value <> "Héli" Then
Target.Offset(0,2).Formulalocal = "=SI(OU(D" & Target.Row & _
"=""copter"";D" & Target.Row & "=""Héli"");""""; _
SOMME(C"& Target.Row & "*E"& Target.Row & "))"
End If
End Sub

je bug, mais je l'ai fait trop rapidement je pense, je recommencerai apr ès aussi.


Avatar
JLuc
Alba avait soumis l'idée :
Wouha ! oui je pensais bien devoir passer en macro, je vais péparer le
fichier avec les colonnes et lignes réelles, avec les informations
nécessaires.

Dans un petit moment parce j'ai un petit garçon qui va avoir faim dans
peu de temps et sont estomac ne connait pas la touche pause, merci de
ton attention JLuc, je reviens te donner les infos un tout petit peu
plus tard.

Je viens de tester

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D1:D20")) Is Nothing Then
If Target.Value <> "coptère" Or Target.Value <> "Héli" Then
Target.Offset(0,2).Formulalocal = "=SI(OU(D" & Target.Row & _
"=""copter"";D" & Target.Row & "=""Héli"");""""; _
SOMME(C"& Target.Row & "*E"& Target.Row & "))"
End If
End Sub

je bug, mais je l'ai fait trop rapidement je pense, je recommencerai après
aussi.



Là, j'ai tester :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D1:D20")) Is Nothing Then
If Target.Value <> "coptère" Or Target.Value <> "Héli" Then
Target.Offset(0, 2).FormulaLocal = "=SI(OU(D" & Target.Row &
"=""copter"";D" & Target.Row & "=""Héli"");"""";SOMME(C" & Target.Row &
"*E" & Target.Row & "))"
End If
End If
End Sub
ATTENTION, le Target.Offset... & "))" est sur une seule ligne !
:oÞ

--
JLuc


Avatar
Alba
J'suis malheureuuuuuse !

Il me dit toujours erreur de compilation End If sans Bloc If !!!
Y'en a 2 des "If" il doit donc bien y avoir 2 "end If "je ne vois pas
ce qu'il veut alors ????

Je l'ai fait ici http://cjoint.com/?brmCnAebEi
Sur mon fichier se sera exactement ces colonnes là et ces termes là,
et c'est le "séance énergétique" qui doit prendre la place du fameux
coptère.

J'suis si désolée de ne pas y arriver, mes connaissances sont
vraiment légères.
Avatar
JLuc
Alba avait soumis l'idée :

J'suis malheureuuuuuse !

Il me dit toujours erreur de compilation End If sans Bloc If !!!
Y'en a 2 des "If" il doit donc bien y avoir 2 "end If "je ne vois pas
ce qu'il veut alors ????

Je l'ai fait ici http://cjoint.com/?brmCnAebEi
Sur mon fichier se sera exactement ces colonnes là et ces termes là,
et c'est le "séance énergétique" qui doit prendre la place du fameux
coptère.

J'suis si désolée de ne pas y arriver, mes connaissances sont
vraiment légères.


Oui, dans mon premier post, j'avais pas tester :oÞ
Dans celui auquel tu m'a fais cette reponse, la solution est bonne

--
JLuc

Avatar
Alba
Je crois que j'ai mal adapté ton code à ma feuille...ne bougez plus
je recommence

On 17 jan, 12:33, "Alba" wrote:
J'suis malheureuuuuuse !

Il me dit toujours erreur de compilation End If sans Bloc If !!!
Y'en a 2 des "If" il doit donc bien y avoir 2 "end If "je ne vois pas
ce qu'il veut alors ????

Je l'ai fait ici http://cjoint.com/?brmCnAebEi
Sur mon fichier se sera exactement ces colonnes là et ces termes là,
et c'est le "séance énergétique" qui doit prendre la place du fameux
coptère.

J'suis si désolée de ne pas y arriver, mes connaissances sont
vraiment légères.


Avatar
Alba
Voilà vous pouvez bouger .......je n'y arrive toujours pas, les lignes
total restent insensibles(:-
On 17 jan, 13:22, "Alba" wrote:
Je crois que j'ai mal adapté ton code à ma feuille...ne bougez plus
je recommence


Avatar
JLuc
Alba avait soumis l'idée :
Voilà vous pouvez bouger .......je n'y arrive toujours pas, les lignes
total restent insensibles(:-
On 17 jan, 13:22, "Alba" wrote:
Je crois que j'ai mal adapté ton code à ma feuille...ne bougez plus
je recommence



Voila, il fallait modifier les termes de test ET dans le If ET dans la
formule à coller :')
Revoici ton fichier, enregistre avec un autre nom, et compare les deux
http://cjoint.com/?brn0Nd1asE

--
JLuc


Avatar
Alba
Merciiiii JLuc, ouf je vais m'en sortir avec cette drôle d'histoire,
c'est sympa merci beaucoup.

Et aussi à garnote (ne prends pas froid ) et à Jb, pour votre aide.
1 2