Check for a change in a cell

[hsviljoen]

Please help with this - I need to check if a value in a cell changed(if the value changes).

Ive used this code:
If Intersect(Target, Range("H28")) Is Nothing Then
Exit Sub
Else
MsgBox "Value changed!"
End If

but this fires even though the value stayed the same...

Any help will be much appreciated

 

[PHV]

Use a static variable to hold the previous value.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[hsviljoen]

Thank you - I did in the end....