Sujet Précédent Sujet Suivant

Excel

Résolu/Fermé
s.ayglon Messages postés 1 Date d'inscription dimanche 5 juillet 2009 Statut Membre Dernière intervention 9 novembre 2011 - 9 nov. 2011 à 16:20
Raymond PENTIER Messages postés 58814 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 15 janvier 2025 - 9 nov. 2011 à 18:13
Bonjour,
Avec Excel peut-on, dans une cellule inscire un chiffre sur un chiffre déjà inscrit et que celui-ci s'aditionne automatiquement au chiffre "écrasé" ?merci et bonne journée




A voir également:

2 réponses

Réponse 1 / 2
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 753
9 nov. 2011 à 16:30
Bonjour,
Non.
A moins que...
Supposons que en A1 vous ayez saisi "=20" sans les guillemets, mais avec le signe égal. Vous voulez saisir maintenant en A1 10 et que A1 vous affiche 30.
Clic sur A1, tapez F2, saisir "+10" sans les guillemets, mais avec le signe plus et tapez Entrée...

Sinon, une solution par macro, si tu le souhaites......
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 753
9 nov. 2011 à 16:40
Un premier jet d'une procédure événementielle VBA :
1- Clic droit sur l'onglet de la feuille concernée / Visualiser le code
2- copier/coller ce code dans la fenêtre VBE 
Option Explicit

Dim OldVal As Double, NewVal As Double
Dim test As Boolean

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = "" Or Target.Count > 1 Or test = False Then
    NewVal = 0
    Exit Sub
End If
If Target.Value <> 0 And IsNumeric(Target.Value) Then NewVal = Target.Value
test = False
Target.Value = NewVal + OldVal
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target = "" Or Target.Count > 1 Then
    OldVal = 0
    Exit Sub
End If
If Target.Value <> 0 And IsNumeric(Target.Value) Then OldVal = Target.Value
test = True
End Sub

3- fermer la fenêtre VBE et testez...
0
Réponse 2 / 2
Raymond PENTIER Messages postés 58814 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 15 janvier 2025 17 266
9 nov. 2011 à 18:13
"peut-on, dans une cellule inscire un chiffre sur un chiffre déjà inscrit et que celui-ci s'aditionne automatiquement au chiffre écrasé" ? Oui :
* Tu tapes la valeur à additionner dans une cellule vide ;
* tu fais Copier ;
* tu reviens dans la première cellule déjà renseignée ;
* tu fais Collage spécial/Addition.
0