Besoin d'aide pour réaliser une macro de cumul

[Aelita]

bonjour

Voici mon problème, je souhaite créer un tableau, une sorte d'inventaire des boissons vendues dans un bar, et j'aimerai que tous les soirs quand je rentre les nouvelles ventes le calcul se fasse seul dans un même cellule. exemple au 29 juillet j'avais vendu 20 coca, le 30 j'en vend 5, je veux que si je tape 5 dans la cellule représentant la quantité de coca le calcul se fasse et apparaisse 25.

J'ai trouvé cette formule de macro en cherchant sur internet :
=CELLULE.ACTIVE()
=ANNULER()
=CELLULE.ACTIVE()
=FORMULE(L(-3)C+L(-1)C;CELLULE.ACTIVE())
=RETOUR()

Mais je ne sais pas ce que je dois mettre entre les parenthèses, qui que j'essaye ça me met un message d'erreur.

Merci d'avance

 

[tototiti2008]

Re : Besoin d'aide pour réaliser une macro de cumul

Bonjour Aelita,
Bienvenue

J'ai trouvé cette formule de macro en cherchant sur internet :

Je serais curieux de savoir où tu as trouvé du code de macro XL4 correspondant à ton problème
Sinon un petit tableau exemple avec où tu tapes tes coca et où tu veux voir ton résultat nous aiderait à t'aider

 

[Aelita]

Re : Besoin d'aide pour réaliser une macro de cumul

Voila l'adresse : https://support.microsoft.com/fr-fr/kb/455648

Et en pièce jointe, je vous met le tableau que je suis en train de faire

 

[tototiti2008]

Re : Besoin d'aide pour réaliser une macro de cumul

Re,

Oui, c'est un support Microsoft de 1992
depuis 1995 environ, le langage a changé, même si l'ancien peut fonctionner
c'est juste dans la colonne B que tu veux cumuler automatiquement ?

 

[Aelita]

Re : Besoin d'aide pour réaliser une macro de cumul

Oui juste dans la colonne B

 

[tototiti2008]

Re : Besoin d'aide pour réaliser une macro de cumul

Re,

un essai
tu dois activer les macros

 

[Aelita]

Re : Besoin d'aide pour réaliser une macro de cumul

Merci, j'ai activé les macros mais quand je rentre un nouveau chiffre, le calcul ne s'effectue pas, ça me remplace l'ancien c'est tout

 

[tototiti2008]

Re : Besoin d'aide pour réaliser une macro de cumul

Re,

Correction, j'avais oublié un truc^^

 

[Aelita]

Re : Besoin d'aide pour réaliser une macro de cumul

Merci beaucoup ça marche nickel

 

[Aelita]

Re : Besoin d'aide pour réaliser une macro de cumul

Désolée, mais j'ai un petit problème quand j'arrive en bas du tableau ça me met des messages d'erreurs, en gros entre boissons chaudes et smoothies.... je ne peux pas rajouter de lignes et pour les smoothies les calculs ne marchent pas.... Comment je peut le corriger? Merci d'avance

 

[tototiti2008]

Re : Besoin d'aide pour réaliser une macro de cumul

Re,

Oui, pas facile de penser à tout

 

[Masiliya]

Bonjour moi également j'ai un problème pareil en fait je vais calculer le cumul d'usage qui dépend de la valeur de OF mais à chaque fois que je change OF le résultat n'est plus le cumul mais plus tôt il refait le calcul selon la nouvelle valeur de OF https://drive.google.com/open?id=0B-Q6E0qx3PwXVmthQVFreHNpS2c
macros:
**************************
Sub Ordre_de_fabrication()
Dim OF As Double
OF = Application.InputBox(prompt:="entrer l'ordre de fabrication", Type:=1)
Worksheets("Tableau contenant l'état lames ").Cells(4, 7).Value = OF
End Sub
***************************
Sub cumul()
Dim cumul(31) As Double
Dim i As Integer
For i = 0 To 31
cumul(i) = cumul(i) + Cells(4, 7) * Worksheets("choix des lames").Cells(i + 2, 2)
Worksheets("Tableau contenant l'état lames ").Cells(i + 2, 2).Value = cumul(i)
Next i
End Sub