Assign an event to chart on workbook open

[Excel Fox]

You can do that with a code like this

Private Sub Workbook_Open()
    Worksheets(1).Shapes(1).OnAction = "MyMacro" 'Replace the indices with the name of the worksheet and the chartobject
End Sub

where 'MyMacro' is the macro you want to assign...

[LalitPandey87]

Thanks for your Quick response.
This forum is like dream come true for me.

You can do that with a code like this

Private Sub Workbook_Open()
    Worksheets(1).Shapes(1).OnAction = "MyMacro" 'Replace the indices with the name of the worksheet and the chartobject
End Sub

where 'MyMacro' is the macro you want to assign...

It works for a single chart i need it for every chart on the workbook.

Thanks again.