Enregistrer une valeur éphémère

Bonjour, dans la réalisation d'un projet sur excel je souhaiterais faire en sorte que la valeur d'une case s'enregistrer automatique dans un tableau, et ce, mes après la supression de la valeur pour avoir un décompte automatique,

Si quelqu'un connais la formule ou le code à utiliser,

Je vous remercie

Bonjour,

Ca manque un peu d'informations mais voici quand même un code à adapter. Ici, A1 est la cellule d'origine et B1 la cellule de destination. Dès que A1 est modifiée, B1 prend sa valeur, sauf lorsque A1 est effacée (B1 conserve sa valeur).

Ce code est à placer dans le module de la feuille concernée (celle où se trouve A1, B1 pouvant se trouver sur une autre feuille à condition de modifier ainsi : sheets("nomdelafeuille").range("B1").value :

private sub worksheet_change(byval target as range)
set rsource = intersect(target, range("A1")) 'rsource = plage ayant subi un changement limitée à A1
if not rsource is nothing then 'si rsource n'est pas un ensemble vide (donc si A1 fait bien partie de la plage modifiée)
    if rsource.value <> "" then 'si A1 non vide
        range("B1").value = rsource.value 'B1 = A1
    end if
end if
end sub    

Cdlt,

Je vous remercie, sois sa répond en partie a mon problème,

Maintenant et il possible que lorsque je modifie ma cellule A1, cela remplis la cellule A2, puis A3 ect , a chaque modification une nouvelle cellule, avec un bouton de validation si besoin ?

Bonjour,

Oui, je pense que c'est possible mais il faudrait vous expliquiez précisément ce que vous souhaitez faire car c'est toujours compliqué de coder à l'aveugle sans certitude des résultats attendus.

Cdlt,