formule Résolu/Fermé

Question

Bonjour, 
  
 voici mon problème:

         H                              I                                          J
sortie stock    valeur sortie stock     quantité sortie du stock/an     
 10                           0€                                      10

ce que j'aimerai c'est que quand je rajoute 10 dans" sortie de stock" ma valeur dans "qté sortie stock/an" est 10, et si je rajoute à nouveau 10 sa m'affiche 20 etc....

merci pour vos réponses.

jipe

DjiDji59430 · Answer

Bonjour,

Essaye en j2     =somme($h:$h) a condition que h ne concerne que les sorties.

Crdlmt

Jipe · Answer

C'est presque ça...
Seulement il faudrait dans sortie stock quand je remets 10 quantité de stock augmente. Car là admettons que j'ai 50 en  qte sortie stock et que je remets 10 dans sortie de stock, qte de sortie stock met 10 aussi, alors qu'il faudrait que ça se rajoute.....
Merci pour votre aide.

Mike-31 · Answer

Bonjour,

D'après ce que je comprends, tu as par exemple 50 dans la cellule B1 et tu veux saisir 10 dans cette cellule B1 et que cette valeur s'ajoute au contenu précédent pour donner 60, es ce cela !

Mike-31 · Answer

Re,

alors ce que tu veux faire ne peut se faire que par VBA si tu as quelques notions.
ensuite il faut être très précis et connaitre exactement la plage à traiter pour ne pas écrire des codes inadaptés et travailler pour rien

Mike-31 · Answer

Re,

Alors ça va être difficile de se comprendre si tu ne connais pas ce langage
 
D'après ce que je comprends, plage H2:H1500 tu as ton stock et c'est dans cette plage que tu veux additionner la valeur existante à la valeur saisie, c'est bien ça !

plage I2:I1500 tu doit avoir une formule qui multiplie le stock colonne H par un prix unitaire

et plage J2:J1500 que veux tu faire ou es ce le contraire, c'est dans cette plage que tu veux ajouter la valeur saisie

Mike-31 · Answer

Re,

On va essayer, clic droit sur ton onglet de feuille concerné/Visualiser le code 

dans la partie blanche colle ce code

Private Sub Worksheet_Change(ByVal Target As Range)Dim Nouveau As SingleIf Not Intersect(Target, Range("H2:H1500")) Is Nothing ThenNouveau = TargetWith Application.EnableEvents = False.UndoTarget = Target + Nouveau.EnableEvents = TrueEnd WithEnd IfEnd Sub 

reviens sur ta feuille et ajoute des valeurs sur ta plage colonne H

Rjp62 · Answer

ok pour la remise à zéro.

oui je voudrais quand tu entres la valeur dans H que J augmente à chaque rentrer dans J.

Exemple : H10    J10
 si encore H10    J20
 si encore H30    J50

Et si H0 alors aucune valeur ne rentre dans J reste à 50 dans l'exemple, jusqu'à qu'une autre valeur dans H entre à nouveau.

Tu vois ce que je veux dire ?

Mike-31 · Answer

Re,

remplace le code par celui ci
Private Sub Worksheet_Change(ByVal Target As Range)Dim Nouveau As SingleOn Error Resume NextIf Not Intersect(Target, Range("H2:H1500")) Is Nothing ThenNouveau = TargetWith Application.EnableEvents = False.UndoTarget = Target + NouveauIf Target + Nouveau > 0 Then Target(1, 3) = Target(1, 3) + Nouveau.EnableEvents = TrueEnd WithEnd IfEnd Sub

Mike-31 · Answer

Re,

Merci bonne fête à toi également
je passe le statut de la discussion en résolu

Formule

9 réponses

Discussions similaires