Hello, hello,


j'ai une question, je voudrais lancer une macro lorsque que la valeur de cellule change au delà d'un certain seuil.

J'ai commencé par écrire ce bout de code qui ne marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
Dim seuil As Double
 
 
   If Target.Previous = 0 Then
      MsgBox ("pas de valeur précédente")
      Exit Sub
   End If
 
   seuil = Target / Target.Previous
 
   If seuil > 0.01 Then
       MsgBox ("big move")
   Else
       MsgBox ("no big change")
   End If
 
End Sub

la variable target.previous est toujours vide
Je pensais que target.previous renvoyait la valeur avant le changement.

Une idée quelqu'un?

Merci.