Item Method (ChartObjects Collection) Example
This example activates embedded chart one.
Worksheets("sheet1").ChartObjects.Item(1).Activate