Should work OK if you put in the sheet module where cell a5 resides. Right
click sheet tabview codecopy/paste there without the sub last() line

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$5" Then graph2
End Sub

Sub graph2()
MsgBox "Works Just fine"
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Arno" wrote in message
...
Hello,

I need a macro to run/call another macro when values in cell A5 changes.

Can you please advise if the syntax below is correct.

So far I cannot get it to work ....

Thank you !! Arno


Sub Last()
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$5" Then
Graph2
End If
End Sub