Very interesting.
How would I cause the message box to appear for 1 second then disapear as if
acknowledged?
Brian Tozer

Rocky McKinley wrote:
Sorry code should have said:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
'Type your Macro name here
MsgBox "A1 value is changing"
End If
End Sub


"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