Start macro on cell change

  • Thread starter Thread starter Giorgio
  • Start date Start date
G

Giorgio

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
 
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
 
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
 
Very interesting.
How would I cause the message box to appear for 1 second then disapear as if
acknowledged?
Brian Tozer
 
Back
Top