<p>Je détecte les changements de valeurs de certaines cellules dans un tableur Excel comme ceci…</p>
<pre><code class="lang-auto">Private Sub Worksheet_Change(ByVal Target As Range)
Dim cell As Range
Dim old_value As String
Dim new_value As String
For Each cell In Target
If Not (Intersect(cell, Range("cell_of_interest")) Is Nothing) Then
new_value = cell.Value
old_value = ' what here?
Call DoFoo (old_value, new_value)
End If
Next cell
End Sub
</code></pre>
<p>En supposant que ce n’est pas une trop mauvaise façon de coder cela, comment puis-je obtenir la valeur de la cellule avant le changement ?</p>