EXCEL Résolu/Fermé

Question

Bonjour, 
je désire faire une somme automatique dont modèle ci-dessous
je voudrais ajouter une somme à chaque  fois qui s'ajoute au total mais qui s'efface
pour que je puisse ajouter une autre somme
comme une calculatrice

100            plus 20
                 plus   5
                 plus   4

le total devrait ajouter à chaque fois
merci de votre réponse

dans excel


Configuration: Windows 7 / Internet Explorer 9.0

gbinforme · Answer

bonjour,

Pourquoi utiliser un tableur alors que la calculatrice le fait très bien ?

Raymond PENTIER · Answer

Bonjour.

Ce sont tes débuts sur Excel ? En effet ta question "je voudrais ajouter une somme à chaque fois qui s'ajoute au total mais qui s'efface pour que je puisse ajouter une autre somme" est très naïve : Une formule change de valeur chaque fois que les données changent ...
Si tu as tes données dans la colonne A, tu auras le total en A1 avec la formule =SOMME(A2:A999) ; tout simplement.

Pitu · Answer

Bonjour,

En fait, tu voudrais avoir 2 cellules : 
La première, saisissable, dans laquelle tu rentres un nombre qui sera automatiquement ajouté au total affiché dans la seconde cellule, c'est bien ça ?

Raymond PENTIER · Answer

Je constate que tu redémarres la même discussion que le 12 janvier 2010 
https://forums.commentcamarche.net/forum/affich-16113291-comment-ajouter-un-nombre-dans-excel

Maintenant que tu sais envoyer un fichier à l'aide de Cjoint.com, et comme ton lien précédent est périmé, veux-tu nous envoyer le fichier sur lequel tu travailles ?

Raymond PENTIER · Answer

Comme je vois que tu tiens beaucoup à fonctionner de cette manière, voici une méthode sans macro.
B2 : total à faire évoluer
C2 : montant à ajouter à volonté

Saisir la valeur en C2 et faire Copier ; 
dans B2, faire Collage spécial/Addition ; 
recommencer autant que nécessaire.

Pitu · Answer

Bonjour,

Je pense que ce que souhaite Restanque doit plutôt ressembler à ça :

	https://www.cjoint.com/?BCxjHBsI2Xz


J'ai juste rajouté le code suivant sur la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)

total = 0

If Target.Row = 2 And Target.Column = 1 Then
    total = Range("B2").Value
    Range("B2").Value = total + Target.Value
        
End If

End Sub