defines a Chart object variable and a ChartGroup object variable and then stops:
Sub ExploreChartElements()
Dim myChart As Chart
Dim myChartg As ChartGroup
Dim ser As Series
Set myChart = ActiveChart
Set myChartg = myChart.ChartGroups(1)
Set ser = myChart.SeriesCollection(1)
Stop
End Sub