Right Click on the sheet name and select "View Code" then paste the
following code.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
MsgBox "A1 value is changing"
End If
End Sub


--
Regards,
Rocky McKinley


"Giorgio" wrote in message
...
Hi,

i would like run a macro whenever the value of a cell
change.This for all the cells in a certain column.

Thankyou
regards
Giorgio