double Clic et calcul

[a26]

Bonjour,
Peut on faire un calcul et afficher 1 résultat par double clic dans cette cellule ou en VBA.
Dans le fichier joint il faut comptabiliser les repas payés en chèque et ceux en espèces.
Pour voir clair dans le tableau il serait intéressant que l'on puisse valider l'un ou l'autre ce qui n'est pas le cas avec une formule a moins d'effacer celle qui n'est pas validée.
Merci de votre réponse

 

[Gelinotte]

Re : double Clic et calcul

Bonjour,

Une solution simple, si ça convient :

J'ai ajouté une colonne (CH) pour chèque et modifié les formules en ajoutant une condition.
Si la colonne CH contient quelque chose (tu choisiras ton caractère préféré), c'est le montant en chèque qui est calculé. Si CH est vide (même pas d'espace), c'est calculé en espèce.


Geli

 

[gilbert_RGI]

Re : double Clic et calcul

Bonjour

une autre solution avec double clique et Enter

 

[a26]

Re : double Clic et calcul

Vos 2 solutions sont parfaites. Je retiendrai la 2e, celle de gilbert 8RGI. Puis-je vous demander encore une variante si l'on a 2 prix ? Pour le fichier joint cela correspondrait au prix enfant qui serait différent.

 

[gilbert_RGI]

Re : double Clic et calcul

à emporter serait (adulte ou enfant ???)

 

[a26]

Re : double Clic et calcul

Adulte, sinon on ne pas gérer enfin je pense...

 

[gilbert_RGI]

Re : double Clic et calcul

alors voilà

 

[a26]

Re : double Clic et calcul

C'est exactement ce que je recherchais. Merci beaucoup !
Si tu peux m'aider pour la suite, je suis preneur. Voilà, je pourrai mettre des formules pour calculer le nombre d'enfants, d'adultes, etc..le total encaissé par chèque ou en numéraire, mais comme la liste des noms n'est pas figée un TCD serait plus pratique. Si tu a la capacité de le faire, je serais la aussi intéressé de savoir comment le faire. Avec excel 2003 cela me semblait plus facile, enfin je crois, mais il y a longtemps que je n'ai pas pratiqué.

 

[gilbert_RGI]

Re : double Clic et calcul

alors voilà sans TCD

 

[a26]

Re : double Clic et calcul

Cela est parfait. Encore merci pour ta collaboration

 

[gilbert_RGI]

Re : double Clic et calcul

alors voilà avec TCD à vous de filtrer ce que vous desirez

 

[a26]

Re : double Clic et calcul

Pour ne pas demander toujours comment l'on fait, mais pour comprendre et pouvoir aussi aider ceux qui ont le même problème, est-il possible de commenter la macro en particulier l'affichage de la formule qui est inhabituel pour moi. C'est à dire ( "=IF(OR(RC[-4]<>"""",RC[-3]<>"""",RC[-2]<>""""),(SUM(RC[-4]+RC[-2])*R1C10)+(RC[-3]*R1C11),"""")". RC et R1C font références à quoi ?

 

[gilbert_RGI]

Re : double Clic et calcul

R = row soit ligne
C = Column soit colonne
If = SI
OR = OU
SUM =SOMME
référencé à partir de la cellule active

? activecell.Formula
=IF(OR(B10<>"",C10<>"",D10<>""),(SUM(B10+D10)*$J$1)+(C10*$K$1),"")
? activecell.FormulaR1C1
=IF(OR(RC[-5]<>"",RC[-4]<>"",RC[-3]<>""),(SUM(RC[-5]+RC[-3])*R1C10)+(RC[-4]*R1C11),"")
?activecell.FormulaR1C1Local
=SI(OU(LC(-5)<>"";LC(-4)<>"";LC(-3)<>"");(SOMME(LC(-5)+LC(-3))*L1C10)+(LC(-4)*L1C11);"")
?activecell.FormulaLocal
=SI(OU(B10<>"";C10<>"";D10<>"");(SOMME(B10+D10)*$J$1)+(C10*$K$1);"")

modifié le message car j'en avais oublié une 😛

 

[gilbert_RGI]

Re : double Clic et calcul

=SI(OU(B10<>"";C10<>"";D10<>"");(SOMME(B10+D10)*$J $1)+(C10*$K$1);"")

ce qui signifie
si b10 différent de "" ou si c10 différent de "" ou si d10 différent de "" alors faire la somme de b10 + d10 puis multiplier cette somme par J1 (en absolu) et ajouter à ça le produit c10*k1(en absolu) sinon marquer ""

 

[a26]

Re : double Clic et calcul

A quoi correspondent les chiffres entre crochets -4, -5,-3