[Débutant - Excel] Evénement avant modification de cellule

Bonjour,

Existe-t-il un évènement déclenché juste avant la modification d'une cellule?
Ce serait pour récupérer la valeur de la cellule quand on passe en mode édition.

J'ai pensé au SelectionChange, mais ce n'est pas vraiment ça (et si on modifie 2 fois de suite la même cellule, la sélection n'a pas changé entre temps, donc ça ne sauvegardera pas la valeur il me semble).

J'utilise le Worksheet_Change() mais ça me donne la valeur une fois la modification réalisée et moi je veux celle avant la modif.

Si quelqu'un a une idée, ça me dépannerai.
Merci d'avance!

Et en combinant les 2 ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Private rAddr As Variant Private rVal As Variant   Private Sub Worksheet_Change(ByVal Target As Range) If Target.AddressLocal = rAddr Then MsgBox "Avant changement : " & rVal & vbCrLf & "Apres changement : " & Target.Value End If End Sub   Private Sub Worksheet_SelectionChange(ByVal Target As Range) rAddr = Target.AddressLocal(True, True) rVal = Target.Value End Sub

---

Le problème est que si l'utilisateur :
1) sélectionne la case à modifier
2) modifie son contenu
3) remodifie son contenu

On ne stockera pas la valeur intermédiaire comme il faut.
C'était pour pouvoir remplacer la 1ère valeur par la seconde dans toute la feuille.
Mais c'est bon, je n'ai plus besoin de cette méthode : on est parti sur un autre fonctionnement.

Merci quand même.

Autant pour moi, il manquait une ligne :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private rAddr As Variant Private rVal As Variant Private Sub Worksheet_Change(ByVal Target As Range) If Target.AddressLocal = rAddr Then MsgBox "Avant changement : " & rVal & vbCrLf & "Apres changement : " & Target.Value rVal = Target.Value End If End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) rAddr = Target.AddressLocal(True, True) rVal = Target.Value End Sub

---

c'est pas mal ton code, je cherchais ça il n'y a pas longtemps, pour déclencher une macro seulementsur le changement d'une seule cellule. je n'avais pas eu de réponse satisfaisante. merci