Macro for charts

[lokeshsu]

Hi all,

I am trying to automate charts, and i have done some rnd and found some code to explode the pie chart, but i want to dynamicly click on the chart and that should automate, i need a code where the series name is taken when i click on the graph. Below is the code which i used to explore the chart

Sub Macro1()
    ActiveSheet.ChartObjects("Chart 1").Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveSheet.ChartObjects("Chart 1").Activate
    ActiveChart.SeriesCollection(1).Points(8).Select
    
Dim a As Long
a = 1
Do Until a = 76
    Selection.Explosion = a
    Application.Wait (1)
    a = a + 1
    Loop
    Range("Q5").Select
   
End Sub

 

[Andrew Poulsom]

To use Events with a Chart on a Worksheet you need a Class module. Here's an example:

Chart Event Class Module to Highlight a Series | Peltier Tech Blog | Excel Charts