Addition dans une cellule
Résolu
Bonjour,
Je souhaiterai additionner dans une cellule plusieurs nombres en les « empilant ». C’est-à-dire ajouter des nombres dans la cellule sans avoir à taper le signe + dans la formule.
Par exemple : dans la cellule 5 puis 5 par-dessus et avoir bien sur 10 ?
Bonne journée et merci pour vos solutions.
Serge
Je souhaiterai additionner dans une cellule plusieurs nombres en les « empilant ». C’est-à-dire ajouter des nombres dans la cellule sans avoir à taper le signe + dans la formule.
Par exemple : dans la cellule 5 puis 5 par-dessus et avoir bien sur 10 ?
Bonne journée et merci pour vos solutions.
Serge
4 réponses
-
-
Par exemple :
=SOMME(A1;A5)
pour avoir de A1 à A5 ? -
ContributeurBonjour
Le principe de base d'Excel est une cellule une info
Donc pour une addition vous entrez vos valeurs les unes en dessous des autres (vous tapez la valeur et validez par entrer) et vous appliquez la formule que Kartzull vous propose en l'adaptant au nombre de lignes
=SOMME(A1;A5)-
Je connais cette façon de faire, ce n’est pas tout à fait ça ma question. Je veux taper 5 dans une cellule, je sélectionne à nouveau cette cellule, je tape 5 et je veux avoir dix. Ex. : taper 5 sur A1, taper à nouveau 5 sur A1 et avoir 10 ?
Merci.
Serge
PS : si c'est con n'hésite pas à me le dire... -
Contributeur@serge30560Voir la proposition de Gyrus
-
-
Bonsoir le fil,
si l'action doit prendre en charge une colonne exemple pour la colonne 1 ou A
clic droit sur l'onglet de la feuille/visualiser le code et coller ce codePrivate Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
ValSaisie = Target
Application.Undo
Target = ValSaisie + Target
Application.EnableEvents = True
End If
End Sub
pour adapter le code à une colonne, remplacer cette ligne
If Target.Column = 1 And Target.Count = 1 Then
par celle ci et adapter les bornes de la plage
If Not Intersect(Target, Range("C3:D10")) Is Nothing Then
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
