Remplacer une saisie dans Excel par un calcul Fermé

Question

Bonjour, 

Question simple pour un problème complexe :
Je souhaite, sous Excel 2010, remplacer ce que je saisis dans une cellule par un calcul.
Exemple : en A2 je saisis : 4126
                 après avoir tapé "Entrée", je voudrais qu'il me remplace "4126" par "=A2-A1".
Une idée ?
Merci de votre aide précieuse


Configuration: Windows 7 / Firefox 11.0 / Excel 2010

Mike-31 · Answer

Salut,

Quel est la logique entre 4126 et A2 et A1 
ou 41 et A2 et 26 et A1

touroul · Answer

Exact Mike, je précise :

En A1 je note mes kilomètres au départ (ex 4054)
En A2 je souhaite saisir mes kilomètres à l'arrivée (ex 4126), et remplacer immédiatement mon 4126 par le résultat du calcul 4126-4054, soit A2-A1.
Une idea ?

Mike-31 · Answer

Re,

Ce genre de problème se traite que par VBA si tu as quelques notions

touroul · Answer

Je ne connais pas VBA malheureusement.
Peut-être qu'il existe un moyen détourné avec Excel (fonction style "Remplacer") mais j'ai cherché sans trouver.
Quelqu'un a une idée ?

doublem93 · Answer

Sinon pourquoi pas en A3 mettre =A2-A1....

Mike-31 · Answer

Re,

Non, il est impossible de le faire dans une cellule contenant une formule ou une saisie. La seule façon est d'utiliser une cellule comme A3 ou une colonne supplémentaire comme en B.
Ou comme dit plus haut en VBA

touroul · Answer

OK, tant pis pour une fonction détournée d'Excel.
Quelqu'un sait où je peux trouver un programme en VBA adapté à ce remplacement ?

Thank you !

Mike-31 · Answer

Re,

Je peux de l'écrire, mais il faut être précis ou seront exactement tes données
exemple en A depuis A2 la première saisie et en face B2 la donnée qui se transformera

ou la première donnée en A2, en A3 la donnée qui se transformera
si tes données sont en colonne A2 et A3 avec une cellule vide en A4 puis en A5 on recommence etc

touroul · Answer

C'est très sympa de me proposer de l'écrire alors que tu ne connais même pas.
J'aurais accepté mais j'avais volontairement simplifié le problème ...
En réalité cette transformation est à faire sur de très nombreuses cellules d'un même tableau. Mais j'apprécie ta bonne volonté.
J'abandonne et créée une colonne supplémentaire

Merci pour votre aide.

Mike-31 · Answer

Re,

Faut pas baisser les bras comme cela,
Pour ceux qui pourraient être intéressés

en supposant que les saisies fixe sont en colonne B et que les valeurs saisies en colonne C se soustraits dès leurs saisies aux données de la colonne C

Clic droit sur l'onglet de la feuille concernée/Visualiser le code et coller ce code

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 3 And Target.Count = 1 Then
    Application.EnableEvents = False
    ValeurSaisie = Target
    Application.Undo
    Target = Target.Offset(0, -1) - ValeurSaisie
    Application.EnableEvents = True
    End If
 End Sub