XL 2013 Intercepter la valeur d'une cellule avant son changement

escouger

XLDnaute Occasionnel
Bonjour,

Je voudrais intercepter la valeur d'une cellule juste avant qu'elle ne change , puis comparer cette valeur avec la nouvelle valeur et positionner dans une cellule adjacente un indicateur indiquant le changement et la date courante

Cas1: Exemple j'ai en A1 la valeur XXX
Je sélectionne A1 et tape YYY
Je souhaite entrer en B1 XXX et en C1 03/06/2016
Cas2: Exemple j'ai en A1 la valeur XXX
Je sélectionne A1 et ne tape rien (donc je ne change pas la valeur de A1)
Je souhaite ne rien mettre en B1 et C1

J'ai écrit ceci qui me permet de récupérer la valeur A1 après sa saisie, mais je n'ai pas trouvé comment stocker sa valeur AVANT modification de manière à gérer une comparaison entre valeur avant et valeur après saisie


Private Sub Worksheet_Change(ByVal Target As Range)
' info après saisie
If Target.Address = "$A$1" Then
xx = Range("C1")
MsgBox (xx)

' comment comparer la valeur de C1 avant saisie et la comparer avec C1 après saisie et déclencher ou pas la mise à jour
' des cellules B1 et C1
End If
End Sub

Merci d'avance de votre support

GE
 

Discussions similaires